This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [Patch libfortran/28452] random intrinsics for large reals
- From: howarth at bromo dot msbb dot uc dot edu (Jack Howarth)
- To: howarth at bromo dot msbb dot uc dot edu, Thomas dot Koenig at online dot de
- Cc: fortran at gcc dot gnu dot org, sgk at troutmask dot apl dot washington dot edu
- Date: Sun, 30 Jul 2006 14:44:04 -0400 (EDT)
- Subject: Re: [Patch libfortran/28452] random intrinsics for large reals
Thomas,
Should the revised patch have...
+#ifdef HAVE_GFC_REAL_16
+
+void
+random_r16 (GFC_REAL_10 *x)
+{
+ GFC_UINTEGER_8 kiss1, kiss2;
...instead of the current...
+#ifdef HAVE_GFC_REAL_16
+
+void
+random_r16 (GFC_REAL_10 *x)
+{
+ GFC_UINTEGER_8 kiss1, kiss2;
...for random.c? I get a compile error of...
/sw/src/fink.build/gcc4-4.1.999-20060730/darwin_objdir/./gcc/xgcc -B/sw/src/fink.build/gcc4-4.1.999-20060730/darwin_objdir/./gcc/ -B/sw/lib/gcc4/powerpc-apple-darwin8/bin/ -B/sw/lib/gcc4/powerpc-apple-darwin8/lib/ -isystem /sw/lib/gcc4/powerpc-apple-darwin8/include -isystem /sw/lib/gcc4/powerpc-apple-darwin8/sys-include -DHAVE_CONFIG_H -I. -I../../../gcc-4.2-20060730/libgfortran -I. -iquote../../../gcc-4.2-20060730/libgfortran/io -I../../../gcc-4.2-20060730/libgfortran/../gcc -I../../../gcc-4.2-20060730/libgfortran/../gcc/config -I../.././gcc -D_GNU_SOURCE -std=gnu99 -Wall -Wstrict-prototypes -Wmissing-prototypes -Wold-style-definition -Wextra -Wwrite-strings -O2 -g -O2 -c ../../../gcc-4.2-20060730/libgfortran/intrinsics/random.c -fno-common -DPIC -o .libs/random.o
../../../gcc-4.2-20060730/libgfortran/intrinsics/random.c:356: error: expected ')' before '*' token
make[3]: *** [random.lo] Error 1
make[2]: *** [all] Error 2
make[1]: *** [all-target-libgfortran] Error 2
for the stock random-patch-4.diff patch.
Jack