diff options
Diffstat (limited to 'contrib/libf2c/libU77/srand_.c')
| -rw-r--r-- | contrib/libf2c/libU77/srand_.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/contrib/libf2c/libU77/srand_.c b/contrib/libf2c/libU77/srand_.c index 8edc62e..822d980 100644 --- a/contrib/libf2c/libU77/srand_.c +++ b/contrib/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; |
