ptr: dump memory starting at '..'

2026-05-05 07:33:37 +00:00 · 2016-03-05 14:32:15 -05:00
parent a0e2c74f40
commit 6fbc8c3a05
1 changed files with 1 additions and 1 deletions
--- a/tools/as7
+++ b/tools/as7
@@ -213,7 +213,7 @@ elsif ($format eq 'list') {
    dump_labels($OUT);
 }
 elsif ($format eq 'ptr') {	# dump absolute memory in PTR binary
-    for my $loc ( 0 .. $#Mem ) {
+    for my $loc ( $Var{'..'} .. $#Mem ) {
 	punch($Mem[$loc] || 0);
    }
 }