1
0
mirror of https://github.com/DoctorWkt/pdp7-unix.git synced 2026-04-15 16:19:44 +00:00

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

This commit is contained in:
Warren Toomey
2016-03-24 08:57:51 +10:00
parent 4f491ba4f9
commit 441fe12b0a

View File

@@ -354,7 +354,13 @@ sub lac {
sub dac {
my ( $instruction, $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;
$PC++;
}