Add missing boolean-valued predicate.

diff --git a/src/compiler/base/utils.scm b/src/compiler/base/utils.scm
index 3eefe681bc8f18fc5b3825f057332384928ec4e2..04b0ea397c56461fa1e3abf5aa477a702223a9e6 100644 (file)
--- a/src/compiler/base/utils.scm
+++ b/src/compiler/base/utils.scm
@@ -331,6 +331,7 @@ USA.
        (ucode-primitive integer-positive?)
        (ucode-primitive integer-zero?)
        (ucode-primitive less-than-fixnum?)
+       (ucode-primitive not)
        (ucode-primitive negative-fixnum?)
        (ucode-primitive negative?)
        (ucode-primitive null?)