mirror of
https://github.com/PDP-10/its.git
synced 2026-02-28 17:29:10 +00:00
a7399d0f9a
Looking at the backup dates for files in <mdl.int>, mdl106.exe is from 20th January 1981, whereas some of the source files are from a couple of years later. Revert to the last version prior to 20th January 1981 -- in every case, this was the earliest revision that was kept in <mdl.int>. This undoes the changes that we'd previously made to these files, many of which are no longer necessary now that we're using MIDAS 73.
27 lines
384 B
Groff
27 lines
384 B
Groff
TITLE CONSTS
|
|
|
|
RELOCA
|
|
|
|
DEFINE C%MAKE A,B
|
|
.GLOBAL A
|
|
|
|
IRP LH,RH,[B]
|
|
A==[LH,,RH]
|
|
.ISTOP
|
|
TERMIM
|
|
TERMIN
|
|
TERMIN
|
|
|
|
IRP X,,[[C%11,1,1],[C%22,2,2],[C%33,3,3],[C%44,4,4],[C%55,5,5],[C%66,6,6]
|
|
[C%0,0,0],[C%1,0,1],[C%2,0,2],[C%3,0,3],[C%M1,-1,-1],[C%M2,-1,-2]
|
|
[C%M10,-1,0],[C%M20,-2,0],[C%M30,-3,0],[C%M40,-4,0],[C%M60,-6,0]]
|
|
|
|
IRP A,B,[X]
|
|
C%MAKE A,[B]
|
|
.ISTOP
|
|
TERMIN
|
|
|
|
TERMIN
|
|
TERMIN
|
|
END
|