| commit | 5f251c2603135f0565ac08898410d795dff8e8d0 | |
| author | Steven G. Kargl <kargls@comcast.net> | |
| Sun, 30 May 2004 10:49:50 +0000 (30 10:49 +0000) | ||
| committer | Paul Brook <pbrook@gcc.gnu.org> | |
| Sun, 30 May 2004 10:49:50 +0000 (30 10:49 +0000) | ||
| tree | c7388f0241ffd16eefa7c8649497e527ecdcbeba | treesnapshot (tar.gz zip) |
| parent | ebeb17c7bb8d07d412b5f02786fb79b0ab0ad2b9 | commitdiff |
iresolve.c (gfc_resolve_random_number): Clean up conditional.
* iresolve.c (gfc_resolve_random_number): Clean up conditional.
libgfortran/
* libgfortran.h (random_seed): Update prototype.
* intrinsics/random.c: Disable old implementation and add new one.
testsuite/
* gfortran.fortran-torture/execute/random_1.f90: New test.
From-SVN: r82443
* iresolve.c (gfc_resolve_random_number): Clean up conditional.
libgfortran/
* libgfortran.h (random_seed): Update prototype.
* intrinsics/random.c: Disable old implementation and add new one.
testsuite/
* gfortran.fortran-torture/execute/random_1.f90: New test.
From-SVN: r82443