diff options
Diffstat (limited to 'gnu/lib/libf2c/libU77/srand_.c')
-rw-r--r-- | gnu/lib/libf2c/libU77/srand_.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/gnu/lib/libf2c/libU77/srand_.c b/gnu/lib/libf2c/libU77/srand_.c index 8edc62e4fe0..822d980dd0f 100644 --- a/gnu/lib/libf2c/libU77/srand_.c +++ b/gnu/lib/libf2c/libU77/srand_.c @@ -24,13 +24,9 @@ Boston, MA 02111-1307, USA. */ #endif #include "f2c.h" -/* Subroutine */ -#ifdef KR_headers -int G77_srand_0 (seed) - integer *seed; -#else -int G77_srand_0 (const integer *seed) -#endif +/* Subroutine */ +int +G77_srand_0 (const integer * seed) { srand ((unsigned int) *seed); return 0; |