Index: /trunk/ccl/level-0/nfasload.lisp
===================================================================
--- /trunk/ccl/level-0/nfasload.lisp	(revision 5042)
+++ /trunk/ccl/level-0/nfasload.lisp	(revision 5043)
@@ -40,7 +40,7 @@
 
 (eval-when (:execute :compile-toplevel)
-  (assert (= 64 numfaslops)))
-
-(defvar *fasl-dispatch-table* #64(%bad-fasl))
+  (assert (= 80 numfaslops)))
+
+(defvar *fasl-dispatch-table* #80(%bad-fasl))
 
 (defun %bad-fasl (s)