0.7.1.43

[sbcl.git] / src / compiler / early-assem.lisp

diff --git a/src/compiler/early-assem.lisp b/src/compiler/early-assem.lisp
index 62f3561..39b33ff 100644 (file)
--- a/src/compiler/early-assem.lisp
+++ b/src/compiler/early-assem.lisp
@@ -11,9 +11,6 @@
 
 (in-package "SB!ASSEM")
 
-(sb!int:file-comment
-  "$Header$")
-
 ;;; FIXME: It might make sense to use SB!VM:BYTE-FOO values here
 ;;; instead of the various ASSEMBLY-UNIT-FOO things, and then define a
 ;;; BYTE type. One problem: BYTE is exported from the CL package, so
@@ -29,7 +26,7 @@
 ;;; sequence.)
 
 ;;; ASSEMBLY-UNIT-BITS -- the number of bits in the minimum assembly
-;;; unit, (also refered to as a ``byte''). Hopefully, different
+;;; unit, (also referred to as a ``byte''). Hopefully, different
 ;;; instruction sets won't require changing this.
 (defconstant assembly-unit-bits 8)
 (defconstant assembly-unit-mask (1- (ash 1 assembly-unit-bits)))