home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_progs / prog_c / suplib.lzh / SUPLIB / SRC / GETPREDOFF.ASM < prev    next >
Encoding:
Assembly Source File  |  1991-08-16  |  254 b   |  20 lines
  1.  
  2.         section CODE
  3.  
  4.         xdef    _GetPredOff        ; sptr = GetPredOff(node:4(sp), off:8(sp))
  5.  
  6. _GetPredOff:    movem.l  4(sp),D0/D1
  7.         move.l    D0,A0
  8.         move.l    4(A0,D1.L),A0
  9.         tst.l    4(A0)
  10.         beq    .gpo0
  11.         suba.l    D1,A0
  12.         move.l    A0,D0
  13.         rts
  14. .gpo0        moveq.l #0,D0
  15.         rts
  16.  
  17.         END
  18.  
  19.  
  20.