diff options
| author | Steven G. Kargl <kargls@comcast.net> | 2004-06-12 17:34:47 +0000 |
|---|---|---|
| committer | Paul Brook <pbrook@gcc.gnu.org> | 2004-06-12 17:34:47 +0000 |
| commit | 2bd749490845f2edc7de74dca4b29fd7d7698dff (patch) | |
| tree | a1452828cb51b5aff27e540fe28a2545fc15adb8 /gcc/fortran/trans-intrinsic.c | |
| parent | b08eae928826bd8474cd30a33949af242dfc400c (diff) | |
| download | gcc-2bd749490845f2edc7de74dca4b29fd7d7698dff.zip gcc-2bd749490845f2edc7de74dca4b29fd7d7698dff.tar.gz gcc-2bd749490845f2edc7de74dca4b29fd7d7698dff.tar.bz2 | |
check.c (gfc_check_second_sub, [...]): New functions.
* 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.
libgfortran
* 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.
From-SVN: r83034
Diffstat (limited to 'gcc/fortran/trans-intrinsic.c')
| -rw-r--r-- | gcc/fortran/trans-intrinsic.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/fortran/trans-intrinsic.c b/gcc/fortran/trans-intrinsic.c index 96eb306..e2c1b7e 100644 --- a/gcc/fortran/trans-intrinsic.c +++ b/gcc/fortran/trans-intrinsic.c @@ -2867,6 +2867,10 @@ gfc_conv_intrinsic_function (gfc_se * se, gfc_expr * expr) case GFC_ISYM_DOT_PRODUCT: case GFC_ISYM_MATMUL: + case GFC_ISYM_IRAND: + case GFC_ISYM_RAND: + case GFC_ISYM_ETIME: + case GFC_ISYM_SECOND: gfc_conv_intrinsic_funcall (se, expr); break; |