glm94/pdp7-unix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fall into single-step mode if we see a low memory write.

Browse Source
This commit is contained in:
Warren Toomey
2016-03-24 08:57:51 +10:00
parent 4f491ba4f9
commit 441fe12b0a
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tools/a7out
+7 -1
View File
@@ -354,7 +354,13 @@ sub lac {
sub dac { sub dac {
my ( $instruction, $addr, $indaddr ) = @_; my ( $instruction, $addr, $indaddr ) = @_;
dprintf( "dac AC (value %06o) into %s\n", $AC, addr($indaddr) ); dprintf( "dac AC (value %06o) into %s\n", $AC, addr($indaddr) );
dprintf("(****WRITE TO LOW MEMORY****)\n") if ($indaddr < 010000 && !($indaddr >= 010 && $indaddr <= 020) ) ;
# Catch writes below the process' memory range
if ($indaddr < 010000 && !($indaddr >= 010 && $indaddr <= 020) ) {
$singlestep = 1;
dprintf("(****WRITE TO LOW MEMORY****)\n");
dprintf( "break at PC %s\n", addr($PC) );
}
$Mem[$indaddr] = $AC; $Mem[$indaddr] = $AC;
$PC++; $PC++;
} }