Add NULL? to constant folding operators.

diff --git a/src/runtime/scomb.scm b/src/runtime/scomb.scm
index 336f34849020861e9083346cc1eb19b46e1b5498..bf8e9a1da24baf6c6da9e70ca67b3cf360d5401f 100644 (file)
--- a/src/runtime/scomb.scm
+++ b/src/runtime/scomb.scm
@@ -105,6 +105,7 @@ USA.
               NEGATIVE-FIXNUM?
               NEGATIVE?
               NOT
+              NULL?
               OBJECT-TYPE
               OBJECT-TYPE?
               ONE-PLUS-FIXNUM