From 38a691aa1d3640a31a7eadf1883271ea249ed9ee Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 28 Mar 2018 06:24:47 -0700 Subject: asm: use capital hex for dregs. * share/txr/stdlib/asm.tl (disassemble-c-d): When printing the data table, use capital hexadecimal for the dregs, consistent with the instruction listing. --- share/txr/stdlib/asm.tl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/share/txr/stdlib/asm.tl b/share/txr/stdlib/asm.tl index 0b2efb69..19ac30ba 100644 --- a/share/txr/stdlib/asm.tl +++ b/share/txr/stdlib/asm.tl @@ -713,7 +713,7 @@ (defun disassemble-c-d (code data funv *stdout*) (let ((asm (new assembler buf code))) (put-line "data:") - (mapdo (do format t " d~,02x: ~s\n" @1 @2) (range 0) data) + (mapdo (do format t " d~,02X: ~s\n" @1 @2) (range 0) data) (put-line "funs:") (mapdo (do format t "~5d: ~s\n" @1 @2) (range 0) funv) (put-line "code:") -- cgit v1.2.3