ERRATA

LISP SYSTEM IMPLEMENTATION

Page 58

-        n = veclen(Obarray);
-        a = vector(Obarray);
-        m = string(Obmap);
+        n = NIL == Obarray? 0: veclen(Obarray);
+        a = NIL == Obarray? NULL: vector(Obarray);
+        m = NIL == Obmap? NULL: string(Obmap);

Thanks, Alexander Shendi!

Page 81

+        protect(y);
         htadd(Symhash, y, mkfix(Symptr));
+        unprot(1);