diff options
Diffstat (limited to 'src/boot/strap/includer.clisp')
| -rw-r--r-- | src/boot/strap/includer.clisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/strap/includer.clisp b/src/boot/strap/includer.clisp index 4d4cd438..154e1cd4 100644 --- a/src/boot/strap/includer.clisp +++ b/src/boot/strap/includer.clisp @@ -92,7 +92,7 @@ (T (SETQ |a| (CAAR |stream|)) (COND ((AND (NOT (< (LENGTH |a|) 8)) - (EQUAL (SUBSTRING |a| 0 8) ")package")) + (STRING= (SUBSTRING |a| 0 8) ")package")) (|shoePackageStartsAt| (CONS (CAAR |stream|) |lines|) |sz| |name| (CDR |stream|))) ((< (LENGTH |a|) |sz|) |