From 73dea2d6213ac7ebd3a9d8922050c26b7f4f03a1 Mon Sep 17 00:00:00 2001 From: Lars Brinkhoff Date: Thu, 20 Dec 2018 11:26:26 +0100 Subject: [PATCH] Fix 11LOGO bug in MOD procedure. The EAE puts the modulo in the AC which is before, not after MQ. --- src/11logo/{eval.336 => eval.337} | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) rename src/11logo/{eval.336 => eval.337} (99%) diff --git a/src/11logo/eval.336 b/src/11logo/eval.337 similarity index 99% rename from src/11logo/eval.336 rename to src/11logo/eval.337 index 2f4490d7..7b58df1c 100644 --- a/src/11logo/eval.336 +++ b/src/11logo/eval.337 @@ -511,9 +511,9 @@ DIV.1: JSR PC,G2NARG MOV #MQ,F MOV B,(F) ;DIVIDEND MOV A,DIVIDE - MOV (F)+,B ;PICK UP QUOTIENT + MOV (F),B ;PICK UP QUOTIENT ADD D,PC ;IF DIVIDE DESIRED, BRANCHES TO DONEMP -DIV.8: MOV (F)+,B ;IF MOD DESIRED, STAYS HERE +DIV.8: MOV -(F),B ;IF MOD DESIRED, STAYS HERE BR DONEMP ;AND PICKS UP REMAINDER ;PREDICATES