Index: /trunk/ccl/lib/level-2.lisp
===================================================================
--- /trunk/ccl/lib/level-2.lisp	(revision 637)
+++ /trunk/ccl/lib/level-2.lisp	(revision 638)
@@ -336,5 +336,4 @@
 
 
-  (%eval-redef %newgotag ())
   (%eval-redef %iasr (x y))