X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fbyte-comp.lisp;h=4c527f8e6342edfce911a542b7b55a42738d20f4;hb=2f421f0541c1f6bf7fb90ee14fe3b205a57f067b;hp=cc8a99996a51358fb06ece53c71c0bf3fcaff5e4;hpb=4823297c200e5b1fcab240f06ce82c308b8ee7d7;p=sbcl.git

diff --git a/src/compiler/byte-comp.lisp b/src/compiler/byte-comp.lisp
index cc8a999..4c527f8 100644
--- a/src/compiler/byte-comp.lisp
+++ b/src/compiler/byte-comp.lisp
@@ -12,12 +12,6 @@
 
 (in-package "SB!C")
 
-;;;; the fasl file format that we use
-(defconstant byte-fasl-file-version 3)
-;;; 1 = before about sbcl-0.6.9.8
-;;; 2 = merged package SB-CONDITIONS into SB-KERNEL around sbcl-0.6.9.8
-;;; 3 = deleted obsolete CONS-UNIQUE-TAG bytecode in sbcl-0.6.11.8
-
 ;;; ### remaining work:
 ;;;
 ;;; - add more inline operations.
@@ -1071,7 +1065,7 @@
 ;;; values to a continuation. If this continuation needs a type check,
 ;;; and has a single value, then we do a type check. We also
 ;;; CANONICALIZE-VALUES for the continuation's desired number of
-;;; values (w/o the placeholders.)
+;;; values (without the placeholders.)
 ;;;
 ;;; Somewhat unrelatedly, we also push placeholders for deleted
 ;;; arguments to local calls. Although we check first, the actual
@@ -1977,7 +1971,7 @@
 	      (describe-byte-component component xeps segment
 				       *compiler-trace-output*))
 	    (etypecase *compile-object*
-	      (fasl-file
+	      (fasl-output
 	       (maybe-mumble "FASL")
 	       (fasl-dump-byte-component segment code-length constants xeps
 					 *compile-object*))