summaryrefslogtreecommitdiff
path: root/libguile/scmsigs.c
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:00:03 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:00:03 +0000
commit47c6b75ea980821737e8030190d24b9aa30e978d (patch)
tree94e1566e9a7bd7b8b4f3abfadde47faad8f45830 /libguile/scmsigs.c
parentf5421cfc2a694b6c4eb9e035d583cc461994b4ce (diff)
downloadguile-47c6b75ea980821737e8030190d24b9aa30e978d.tar.gz
* *.[ch]: Replace SCM_VALIDATE_INT w/ SCM_VALIDATE_INUM for
better consistency with the names of other SCM_VALIDATE_ macros and better conformance to guile naming policy.
Diffstat (limited to 'libguile/scmsigs.c')
-rw-r--r--libguile/scmsigs.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/libguile/scmsigs.c b/libguile/scmsigs.c
index 6a2c3ace6..fd49ab798 100644
--- a/libguile/scmsigs.c
+++ b/libguile/scmsigs.c
@@ -222,7 +222,7 @@ structures.")
SCM *scheme_handlers = SCM_VELTS (*signal_handlers);
SCM old_handler;
- SCM_VALIDATE_INT_COPY(1,signum,csig);
+ SCM_VALIDATE_INUM_COPY(1,signum,csig);
#if defined(HAVE_SIGACTION)
#if defined(SA_RESTART) && defined(HAVE_RESTARTABLE_SYSCALLS)
/* don't allow SA_RESTART to be omitted if HAVE_RESTARTABLE_SYSCALLS
@@ -234,7 +234,7 @@ structures.")
#endif
if (!SCM_UNBNDP (flags))
{
- SCM_VALIDATE_INT(3,flags);
+ SCM_VALIDATE_INUM(3,flags);
action.sa_flags |= SCM_INUM (flags);
}
sigemptyset (&action.sa_mask);
@@ -382,7 +382,7 @@ no previous alarm, the return value is zero.")
#define FUNC_NAME s_scm_alarm
{
unsigned int j;
- SCM_VALIDATE_INT(1,i);
+ SCM_VALIDATE_INUM(1,i);
j = alarm (SCM_INUM (i));
return SCM_MAKINUM (j);
}
@@ -410,7 +410,7 @@ of seconds remaining otherwise.")
#define FUNC_NAME s_scm_sleep
{
unsigned long j;
- SCM_VALIDATE_INT_MIN(1,i,0);
+ SCM_VALIDATE_INUM_MIN(1,i,0);
#ifdef USE_THREADS
j = scm_thread_sleep (SCM_INUM(i));
#else
@@ -426,7 +426,7 @@ GUILE_PROC(scm_usleep, "usleep", 1, 0, 0,
"")
#define FUNC_NAME s_scm_usleep
{
- SCM_VALIDATE_INT_MIN(1,i,0);
+ SCM_VALIDATE_INUM_MIN(1,i,0);
#ifdef USE_THREADS
/* If we have threads, we use the thread system's sleep function. */
@@ -456,7 +456,7 @@ Sends a specified signal @var{sig} to the current process, where
@var{sig} is as described for the kill procedure.")
#define FUNC_NAME s_scm_raise
{
- SCM_VALIDATE_INT(1,sig);
+ SCM_VALIDATE_INUM(1,sig);
SCM_DEFER_INTS;
if (kill (getpid (), (int) SCM_INUM (sig)) != 0)
SCM_SYSERROR;