[gfortran] g77 compatibility patch

[Steve Kargl <sgk at troutmask dot apl dot washington dot edu>]

The patches and files included here implement the
following g77 functions and subroutines:
  intrinsic functions:   dtime, etime, irand, rand, second.
  intrinsic subroutines: dtime, etime, second, srand.
I have tried to address the rounding issues in rand() that
were discussed in other emails.  I'm sure there are problems
or changes that someone will want to these routines.  Feel
free to fix them.  I will not have time to work on gfortran
for the next 2 to 4 weeks.  The documentation of each function
or subroutine is contained in g77.info.

ChangeLog for gcc/fortran

2004-05-31  Steven G. Kargl  <kargls@comcast.net>
     * check.c (gfc_check_second_sub, gfc_check_irand, gfc_check_rand
       gfc_check_srand, gfc_check_etime, gfc_check_etime_sub): New functions.
     * gfortran.h (gfc_generic_isym_id): New symbols GFC_ISYM_ETIME,
       GFC_ISYM_IRAND, GFC_ISYM_RAND, GFC_ISYM_SECOND.
     * trans-intrinsic.c:  Use symbols.
     * intrinsic.c (add_sym_2s): New function.
     * intrinsic.c: Add etime, dtime, irand, rand, second, srand.
     * intrinsic.h: Function prototypes.
     * iresolve.c (gfc_resolve_etime_sub, gfc_resolve_second_sub 
       gfc_resolve_srand):  New functions.

ChangeLog for libgfortran

2004-05-31  Steven G. Kargl  <kargls@comcast.net>
     * Makefile.am: Add rand.c and etime.c
     * Makefile.in: Regenerated.
     * aclocal.in: Regenerated.
     * cpu_time.c (second_sub, second): New functions.
     * rand.c (irand, rand, srand): New file.
     * etime.c (etime_sub, etime): New file.

-- 
Steve

Attachment: etime.c
Description: Text document

Attachment: rand.c
Description: Text document

Attachment: libgfortran.diff
Description: Text document

Attachment: fortran.diff
Description: Text document