Google
 
Trailing-Edge - PDP-10 Archives - decuslib20-05 - decus/20-0137/linf10.mac
There are 2 other files named linf10.mac in the archive. Click here to see a list.
       TITLE  DEPBYT
       ENTRY  DEPSIT
DEPSIT:MOVE   6,@0(16)
       MOVE   7,@1(16)
       MOVE   8,@2(16)
       MOVEM  8,DATA
       LSH    6,-35
       DPB    6,PTR(7)
       MOVE   8,DATA
       MOVEM  8,@2(16)
       POPJ   17,
PTR:   0
       POINT  7,DATA,6
       POINT  7,DATA,13
       POINT  7,DATA,20
       POINT  7,DATA,27
       POINT  7,DATA,34
DATA:  0
       END