Hello all,

Actually, HQNORM (at least in the latest R forge version, see
https://r-forge.r-project.org/scm/viewvc.php/pkg/randtoolbox/src/LowDiscrepancy.f?view=markup&revision=5094&root=rmetrics)
is declared as

C ------------------------------------------------------------------------------


      DOUBLE PRECISION FUNCTION HQNORM(P)


So it should be ok. I spent a lot of time few weeks ago to remove any
implicit type declaration, so I'm pretty sure there aren't any since the
code passes

gfortran -c -fsyntax-only -fimplicit-none LowDiscrepancy.f


I don't know what to do more!

Christophe

2011/6/7 Yohan Chalabi <chalabi@phys.ethz.ch>

> Hi Dirk,
>
> Thanks to point this out.
>
> HQNORM is not declared as a double precision function in HALTON and might
> be implicitly declared as single precision.
>
> I will upload a patch later today and see if it works.
>
> Regards,
> Yohan
>
>
> On Jun 7, 2011, at 3:55 PM, Dirk Eddelbuettel wrote:
>
> >
> > Christophe,
> >
> > Would you be able to help in this Fortran-related build failure for
> fOptions?
> > The compiler now complains that LowDiscrepancy has conflicting types, and
> > with my limited Fortran skills I see no fix -- the declarations seem fine
> to
> > me.
> >
> > The URL below has more detail, and I'd be happy to fill in more details.
> >
> > Thanks,  Dirk
> >
> > On 28 May 2011 at 16:58, Dirk Eddelbuettel wrote:
> > |
> > | Hi all,
> > |
> > | During a routine rebuild of the Debian archive, it was noticed that
> > | fOptions no longer builds (http://bugs.debian.org/628314) as the
> Fortran
> > | compiler (now gfortan-4.6) seems pickier:
> > |
> > | > make[1]: Entering directory
> `/build/user-foptions_2110.78-1-amd64-xexJr_/foptions-2110.78/src'
> > | > gfortran   -fpic  -O3 -pipe  -g -c 085A-LowDiscrepancy.f -o
> 085A-LowDiscrepancy.o
> > | > 085A-LowDiscrepancy.f:181.32:
> > | >
> > | >                QN(I, J) = HQNORM(QUASI(J))
> > | >                                 1
> > | > Error: Return type mismatch of function 'hqnorm' at (1)
> (REAL(4)/REAL(8))
> > | > make[1]: *** [085A-LowDiscrepancy.o] Error 1
> > |
> > | I do not write Fortran so would not know how to fix this. Any RMetrics
> export
> > | who can fix this?
> > |
> > | Dirk
> > |
> > | --
> > | Gauss once played himself in a zero-sum game and won $50.
> > |                       -- #11 at http://www.gaussfacts.com
> > |
> > | _______________________________________________
> > | Rmetrics-core mailing list
> > | Rmetrics-core@r-project.org
> > | https://stat.ethz.ch/mailman/listinfo/rmetrics-core
> >
> > --
> > Gauss once played himself in a zero-sum game and won $50.
> >                      -- #11 at http://www.gaussfacts.com
> >
> > _______________________________________________
> > Rmetrics-core mailing list
> > Rmetrics-core@r-project.org
> > https://stat.ethz.ch/mailman/listinfo/rmetrics-core
> >
>
> --
> PhD candidate
> Swiss Federal Institute of Technology
> Zurich
>
> www.ethz.ch
>
>


-- 
Christophe DUTANG
Ph. D. student at ISFA, Lyon, France

	[[alternative HTML version deleted]]

