diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 9d45a17bb..ae8a53315 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,9 @@
+2000-06-18  Michael Livshin  <mlivshin@bigfoot.com>
+
+	* scmsigs.c (s_scm_sigaction): guard the SIGIOT case with an
+ 	#ifdef -- it's missing on at least one platform.  (thanks to
+ 	Jan Nieuwenhuizen).
+
 2000-06-16  Dirk Herrmann  <D.Herrmann@tu-bs.de>
 
 	* list.c (list*):  Added documentation from common-list.scm.
diff --git a/libguile/scmsigs.c b/libguile/scmsigs.c
index 2146ac038..6d49e8e99 100644
--- a/libguile/scmsigs.c
+++ b/libguile/scmsigs.c
@@ -300,7 +300,7 @@ SCM_DEFINE (scm_sigaction, "sigaction", 1, 2, 0,
     case SIGSEGV:
     case SIGBUS:
     case SIGABRT:
-#if SIGIOT != SIGABRT
+#if defined(SIGIOT) && (SIGIOT != SIGABRT)
     case SIGIOT:
 #endif
     case SIGTRAP: