diff --git a/hemlock/spell-corr.lisp b/hemlock/spell-corr.lisp index 535581ffa9a755c23dbabda7f78b44788ca4a1f1..f2b3056e565b44d07e80a6cd1f5a083636fc30fa 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