Raymond Toy pushed to branch master at cmucl / cmucl Commits: 704b1ae0 by Raymond Toy at 2015-10-11T09:07:54Z Change disassembly to use .byte and .word instead of byte and word when printing random bytes and words. - - - - - 1 changed file: - src/compiler/disassem.lisp Changes: ===================================== src/compiler/disassem.lisp ===================================== --- a/src/compiler/disassem.lisp +++ b/src/compiler/disassem.lisp @@ -2470,7 +2470,7 @@ (declare (type offset num) (type stream stream) (type disassem-state dstate)) - (format stream "~a~vt" 'BYTE (dstate-argument-column dstate)) + (format stream "~a~vt" '.BYTE (dstate-argument-column dstate)) (let ((sap (dstate-segment-sap dstate)) (start-offs (dstate-cur-offs dstate))) (dotimes (offs num) @@ -2483,7 +2483,7 @@ (declare (type offset num) (type stream stream) (type disassem-state dstate)) - (format stream "~a~vt" 'WORD (dstate-argument-column dstate)) + (format stream "~a~vt" '.WORD (dstate-argument-column dstate)) (let ((sap (dstate-segment-sap dstate)) (start-offs (dstate-cur-offs dstate)) (byte-order (dstate-byte-order dstate))) View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/704b1ae0c0a023bf315a965241...