This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
Other format: | [Raw text] |
Here is an implementation of irand(), rand(), and srand() for G77 compatibility. I have bootstrapped and tested gfortran on FreeBSD. The outputs from a program using these functions and compiled with gfortran and g77 were compared. On the FreeBSD, the outputs were essentially identical. ChangeLog for gcc/fortran 2004-05-30 Steven G. Kargl <kargls@comcast.net> * check.c (gfc_check_irand, gfc_check_rand, gfc_check_srand): New functions. * iresolve.c (gfc_resolve_srand): New function. * intrinsic.h: Add prototypes for new functions. * gfortran.h: New symbols GFC_ISYM_IRAND and GFC_ISYM_RAND. * intrinsic.c (add_functions): Use symbols. Add irand and rand. * intrinsic.c (add_subroutines): Add srand. * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols. ChangeLog for libgfortran 2004-05-30 Steven G. Kargl <kargls@comcast.net> * rand.c (irand, srand, rand): New file * Makefile.am: Update for rand.c * Makefile.in: Regenerated. * aclocal.am: Regenerated. -- Steve
Attachment:
rand.c
Description: Text document
Attachment:
libgfortran.diff
Description: Text document
Attachment:
fortran.diff
Description: Text document
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |