diff options
Diffstat (limited to 'gcc/fortran/intrinsic.c')
| -rw-r--r-- | gcc/fortran/intrinsic.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/fortran/intrinsic.c b/gcc/fortran/intrinsic.c index 022f104..659b507 100644 --- a/gcc/fortran/intrinsic.c +++ b/gcc/fortran/intrinsic.c @@ -1492,6 +1492,11 @@ add_functions (void) gfc_check_rand, NULL, NULL, i, BT_INTEGER, 4, 0); + /* Compatibility with HP FORTRAN 77/iX Reference. Note, rand() and + ran() use slightly different shoddy multiplicative congruential + PRNG. */ + make_alias ("ran"); + make_generic ("rand", GFC_ISYM_RAND); add_sym_1 ("range", 0, 1, BT_INTEGER, di, |