Trailing-Edge
-
PDP-10 Archives
-
SRI_NIC_PERM_SRC_3_19910112
-
midas/midas.diff
There are no other files named midas.diff in the archive.
;COMPARISON OF PS:<MIDAS>MIDAS.MID.429 AND PS:<MIDAS>MIDAS.NEW.433
;OPTIONS ARE /E /L /W /3
**** FILE PS:<MIDAS>MIDAS.MID.429, 1-3 (86)
1) .ELSE .SYMTAB 17393. ;2001.th prime -- Assemble faster elsewhere.
1) TITLE MIDAS
**** FILE PS:<MIDAS>MIDAS.NEW.433, 1-3 (86)
2) .ELSE .SYMTAB 10007. ;Assemble faster elsewhere.
2) TITLE MIDAS
***************
**** FILE PS:<MIDAS>MIDAS.MID.429, 1-109 (5187) AFTER P=:
1) IFNDEF BKTABL,BKTABL==40 ;MAX NUM .BEGIN BLOCKS.
1) IFNDEF BKPDLS,BKPDLS==10 ;MAXIMUM .BEGIN BLOCK NESTING DEPTH.
**** FILE PS:<MIDAS>MIDAS.NEW.433, 1-109 (5169) AFTER P=:
2) IFNDEF BKTABL,BKTABL==100 ;MAX NUM .BEGIN BLOCKS.
2) IFNDEF BKPDLS,BKPDLS==10 ;MAXIMUM .BEGIN BLOCK NESTING DEPTH.
***************
**** FILE PS:<MIDAS>MIDAS.MID.429, 10-25 (20839) AFTER R5==:
1) IFN ITSSW,MINPUR==160 ;BLOCK NUMBER BEGINNING OF PURE CODING
1) ;PURE CODING UNTIL MAXPUR*2000-SOMETHING
**** FILE PS:<MIDAS>MIDAS.NEW.433, 10-25 (20822) AFTER R5==:
2) IFN ITSSW,MINPUR==200 ;BLOCK NUMBER BEGINNING OF PURE CODING
2) ;PURE CODING UNTIL MAXPUR*2000-SOMETHING
***************
**** FILE PS:<MIDAS>MIDAS.MID.429, 33-9 (61875) AFTER MINUS:
1) JUMPGE FF,PLS1
1) MOVE T,GETFLG(P)
**** FILE PS:<MIDAS>MIDAS.NEW.433, 33-9 (61858) AFTER MINUS:
2) ;433 This instr was causing [foo] and [-foo] to be mistakenly
2) ; constants-optimized to the same thing during pass1, resulting in a
2) ; "more constants on pass2 than pass1" error.
2) ; JUMPGE FF,PLS1
2) MOVE T,GETFLG(P)
***************
**** FILE PS:<MIDAS>MIDAS.MID.429, 63-18 (109043) AFTER LBRAK:
1) JRST ASSEM3 ;GO ASSEMBLE THE WORDS OF THE CONSTANT.
**** FILE PS:<MIDAS>MIDAS.NEW.433, 63-18 (109207) AFTER LBRAK:
2) MOVEI A,IRPSUD\IREQL
2) ANDCAM A,ASMI
2) JRST ASSEM3 ;GO ASSEMBLE THE WORDS OF THE CONSTANT.
***************
**** FILE PS:<MIDAS>MIDAS.MID.429, 181-15 (304497) AFTER TSYMGT:
1) .VALUE
1) IFN PURESW,[
1) MOVE AA,[MINBNK-MINMAC,,MINBNK]
1) .CALL INITSB ;GET PAGES FOR BLANK CODE & SYMTAB.
1) .VALUE
1) SKIPN PURIFG
**** FILE PS:<MIDAS>MIDAS.NEW.433, 181-15 (304700) AFTER TSYMGT:
2) .LOSE %LSSYS
2) IFN PURESW,[
2) MOVE AA,[MINBNK-MINMAC,,MINBNK]
2) .CALL INITSB ;GET PAGES FOR BLANK CODE & SYMTAB.
2) .LOSE %LSSYS
2) SKIPN PURIFG
***************