From e36732253a1a480f1df69b0a6e61861d86fda8e2 Mon Sep 17 00:00:00 2001 From: Lars Brinkhoff Date: Mon, 17 Jun 2019 08:49:53 +0200 Subject: [PATCH] Fix unterminated MACTAP literals. --- src/sysen2/{mactap.f71 => mactap.f72} | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) rename src/sysen2/{mactap.f71 => mactap.f72} (98%) mode change 100755 => 100644 diff --git a/src/sysen2/mactap.f71 b/src/sysen2/mactap.f72 old mode 100755 new mode 100644 similarity index 98% rename from src/sysen2/mactap.f71 rename to src/sysen2/mactap.f72 index f0a5f5b0..3d165ca3 --- a/src/sysen2/mactap.f71 +++ b/src/sysen2/mactap.f72 @@ -466,12 +466,12 @@ SETUPR: MOVE A,-3(B) SKIPA D,FPNTR ADDI D,2 CAME A,(D) - CAMN A,[SIXBIT /*/ + CAMN A,[SIXBIT /*/] JRST .+2 AOBJN C,LOOK+2 JUMPGE C,LOOK1 CAME B,1(D) - CAMN B,[SIXBIT /*/ + CAMN B,[SIXBIT /*/] JRST .+2 AOBJN C,LOOK+2 LOOK1: TLZN C,-1 @@ -504,7 +504,7 @@ OPNRD": PUSHJ P,SAVAC CLEARM RCNTR MOVEI B,RDATAS PUSHJ P,SETUPR - MOVE A,[70700,,CEOF + MOVE A,[70700,,CEOF] MOVEM A,UREDP MOVEI A,RBEGB+200 HRRM A,RED2 @@ -558,8 +558,8 @@ FILE1: MOVEI A,SYSEOF PUSHJ P,UWR JFCL SOJG B,.-2 - MOVE A,[SYSEOF_11.,,1 -FILE1B: LDB B,[700,,WCNTR + MOVE A,[SYSEOF_11.,,1] +FILE1B: LDB B,[700,,WCNTR] JUMPE B,FILE3 PUSHJ P,WR JRST FILE7 @@ -710,7 +710,7 @@ CRESTOR: JRST RESTOR PUSHJ P,OPNTP1 JUMPL A,ERR4 MOVE C,FPNTR - LDB C,[370500+C,,177 + LDB C,[370500+C,,177] CAIN C,37 JRST RESTOR ERR3: MOVNI A,1 @@ -775,12 +775,12 @@ URED3: SKIPGE EOF JRST .-3 JRST URED -UREDE: MOVE A,[70700,,CEOFA +UREDE: MOVE A,[70700,,CEOFA] MOVEM A,UREDP MOVEI A,14 ELSE QUITFF,JRST POPJA,[POPJ P,] -URED2: MOVE A,[440700,,RBEGB +URED2: MOVE A,[440700,,RBEGB] MOVEM A,UREDP JRST URED3