[pkgsrc/trunk]: pkgsrc/math/R-lmm fixup patch from previous.

[markd <markd%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/ee33bc9248a7
branches:  trunk
changeset: 548420:ee33bc9248a7
user:      markd <markd%pkgsrc.org@localhost>
date:      Tue Oct 14 22:41:44 2008 +0000

description:
fixup patch from previous.

diffstat:

 math/R-lmm/distinfo         |  4 ++--
 math/R-lmm/patches/patch-aa |  7 ++++---
 2 files changed, 6 insertions(+), 5 deletions(-)

diffs (33 lines):

diff -r 567d44d05ddd -r ee33bc9248a7 math/R-lmm/distinfo
--- a/math/R-lmm/distinfo       Tue Oct 14 22:35:19 2008 +0000
+++ b/math/R-lmm/distinfo       Tue Oct 14 22:41:44 2008 +0000
@@ -1,6 +1,6 @@
-$NetBSD: distinfo,v 1.2 2008/10/14 06:38:21 markd Exp $
+$NetBSD: distinfo,v 1.3 2008/10/14 22:41:44 markd Exp $
 
 SHA1 (R/lmm_0.3-5.tar.gz) = 47576977719aba4e8c0cf3f9b13db4747cc9a4d9
 RMD160 (R/lmm_0.3-5.tar.gz) = de3d86ae4ba7716bae8c2e56980da23ca9cee1a9
 Size (R/lmm_0.3-5.tar.gz) = 214352 bytes
-SHA1 (patch-aa) = 3aec0141a51f95167d5fb27cabaaea84dfb6be48
+SHA1 (patch-aa) = 85195d02f6be923e38aa5536f48f19b91d47269c
diff -r 567d44d05ddd -r ee33bc9248a7 math/R-lmm/patches/patch-aa
--- a/math/R-lmm/patches/patch-aa       Tue Oct 14 22:35:19 2008 +0000
+++ b/math/R-lmm/patches/patch-aa       Tue Oct 14 22:41:44 2008 +0000
@@ -1,13 +1,14 @@
-$NetBSD: patch-aa,v 1.1 2008/10/14 06:38:22 markd Exp $
+$NetBSD: patch-aa,v 1.2 2008/10/14 22:41:44 markd Exp $
 
---- src/lmm.f.orig     2008-10-14 19:30:49.000000000 +1300
+--- src/lmm.f.orig     2003-12-04 09:19:01.000000000 +1300
 +++ src/lmm.f
-@@ -549,7 +549,7 @@ C     3 = inadequate information to obta
+@@ -549,7 +549,8 @@ C     3 = inadequate information to obta
  C     4 = value of xi or inv(Ui) became non-pos.def. during iterations
  C     5 = t(X)%*%W%*%X became non-pos.def. during iterations
  C     6 = supplied xihat is non-pos.def.
 -      integer gmax/50/
 +      integer gmax
++      data gmax/50/
        double precision estarhat(0:50)
        integer ntot,subj(ntot),m,ist(m),ifin(m),occ(ntot),nmax,
       /     pcol,q,zcol(q),iflag,err,msg,iter,p,xcol(p),i,j,