github.com/DoctorWkt.pdp7-unix
1
0
Fork 0
mirror of https://github.com/DoctorWkt/pdp7-unix.git synced 2026-02-07 17:01:39 +00:00
Code Issues Releases Wiki Activity

Added a dprintf which I forgot.

Browse Source
This commit is contained in:
Warren Toomey
2016-03-04 15:37:04 +10:00
parent 6f3008e8bd
commit c8ac75f371
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
tools/a7out
View File

@@ -489,6 +489,7 @@ sub eae {
if ( $instruction == 0653323 ) { # idiv: integer division
my $divisor= $Mem[ $PC+1 ];
dprintf( "div AC %06o AC by %06o (decimal %d by %d)\n", $AC, $divisor, $AC, $divisor );
# Prevent division by zero :-)
my $quotient = ($divisor) ? $AC / $divisor : 0;
my $remainder = ($divisor) ? $AC % $divisor : 0;