diff options
| author | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-12 18:30:09 +0000 |
|---|---|---|
| committer | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-12 18:30:09 +0000 |
| commit | 6b5a304f6b006beeb6088d5002c7574e874b28e3 (patch) | |
| tree | e8c4739bb0e2e1cb7ccf7b7a5a024d36258073a6 /libguile/random.c | |
| parent | 5bff3127b542b14a9f881af0b68d61e21712d9c8 (diff) | |
| download | guile-6b5a304f6b006beeb6088d5002c7574e874b28e3.tar.gz | |
* *.c, scm_validate.h: Use SCM_VALIDATE_NIM, not SCM_VALIDATE_NIMP
(none of the other validate macros have the trailing P).
Diffstat (limited to 'libguile/random.c')
| -rw-r--r-- | libguile/random.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/random.c b/libguile/random.c index cdfbb0b83..5dac2b37e 100644 --- a/libguile/random.c +++ b/libguile/random.c @@ -364,7 +364,7 @@ GUILE_PROC (scm_random, "random", 1, 1, 0, SCM_ASSERT_RANGE (1,n,m > 0); return SCM_MAKINUM (scm_c_random (SCM_RSTATE (state), m)); } - SCM_VALIDATE_NIMP(1,n); + SCM_VALIDATE_NIM (1,n); if (SCM_REALP (n)) return scm_makdbl (SCM_REALPART (n) * scm_c_uniform01 (SCM_RSTATE (state)), 0.0); |