From d25be9440d9ecd7be0673c421f816aa2d5d74e00 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Fri, 9 Nov 1990 22:56:37 +0000 Subject: [PATCH] Added an eval-when (compile load eval) around defconstants that are needed at compile time. --- hemlock/spell-corr.lisp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/hemlock/spell-corr.lisp b/hemlock/spell-corr.lisp index 535581ffa..f2b3056e5 100644 --- a/hemlock/spell-corr.lisp +++ b/hemlock/spell-corr.lisp @@ -168,6 +168,8 @@ ;;;; Some Constants +(eval-when (compile load eval) + ;;; The next number (using 6 bits) is 63, and that's pretty silly because ;;; "supercalafragalistic" is less than 31 characters long. ;;; @@ -214,6 +216,8 @@ (defconstant stored-length-byte (byte 5 0)) +); eval-when (compile load eval) + ;;;; Some Specials and Accesses -- GitLab