X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Ftarget-byte-comp.lisp;h=844b199a3ac6237f9dec17a5851726aa65803c90;hb=d3862cc781cabf52f15c2d3a164f992dbbba84f4;hp=287b7bfa8289f5e1ca653e27818b87420bced30c;hpb=7dd568fb64927be78556ac27f1f0dc60e79cf942;p=sbcl.git diff --git a/src/compiler/target-byte-comp.lisp b/src/compiler/target-byte-comp.lisp index 287b7bf..844b199 100644 --- a/src/compiler/target-byte-comp.lisp +++ b/src/compiler/target-byte-comp.lisp @@ -119,7 +119,7 @@ (format t "~&~4D:" index)) (next-byte () (let ((byte (sap-ref-8 sap index))) - (format t " ~2,'0X" byte) + (format t " ~2,'0X " byte) (incf index) byte)) (extract-24-bits ()