[net.sources.mac] Bug in Disassembler for Modula-2 Link Files

bobc@tikal.UUCP (Bob Campbell) (09/12/85)

Sharp eyes else where on the net found a bug in the code for decoding
the LEA instruction even before the code was posted (if I would have
examined my mail closer I would have seen it).  I used the IBM syntax
Reg,Address which is incorrect it should have been Address,Reg.

The diffs are as follows (the error is first, and the correction is
second).

RCS file: RCS/Disasm.MOD,v
retrieving revision 1.1
diff -c -r1.1 Disasm.MOD
*** /tmp/,RCSt1004956	Wed Sep 11 13:55:19 1985
--- Disasm.MOD	Wed Sep 11 13:53:36 1985
***************
*** 495,501
              ELSIF Size = 3 THEN
                  WriteString('LEA');
!                 Write2EA(1,ASH(Nibble1,-1) MOD 8,Mode,Reg,FALSE)
              ELSE
--- 495,501 -----
              ELSIF Size = 3 THEN
                  WriteString('LEA');
!                 Write2EA(Mode,Reg,1,ASH(Nibble1,-1) MOD 8,FALSE)
              ELSE

Bob Campbell
uw-beaver!tikal!bobc