diff options
| -rw-r--r-- | dynamic.e | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/dynamic.e b/dynamic.e index af5d9b2..d792137 100644 --- a/dynamic.e +++ b/dynamic.e @@ -180,15 +180,15 @@ newline 5 ndrop ; -~ (end, start --) +~ (start, end --) : hexdump-between - dup 16 1- invert & + swap dup 16 1- invert & { dup 3 pick > } { 3dup hexdump-row 16 + } while 3 ndrop ; ~ (start, length --) -: hexdump-from swap dup 3unroll + swap hexdump-between ; +: hexdump-from swap dup 3unroll + hexdump-between ; ~ (start --) @@ -199,7 +199,7 @@ : describe-hex dup word-heading dup guess-entry-end swap entry-to-execution-token - hexdump-between ; + swap hexdump-between ; ~ (entry pointer --) |