home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / mint / lib / mntc6846.zoo / patch / dftst.s < prev    next >
Encoding:
Text File  |  1994-11-14  |  604 b   |  21 lines
  1.  !  C68 8 byte floating point routine to test for zero
  2.  !-----------------------------------------------------------------------------
  3.  !  #1    First version            Keith and Dave Walker        12/92
  4.  !  #2    Changed entry/exit code for C68 v4.3 compatibility    -djw-    09/93
  5.  !-----------------------------------------------------------------------------
  6.  
  7.     .sect .text
  8.  
  9.     .define    .Xdftst
  10.  
  11. .Xdftst:
  12.     move.l    4(sp),a0        ! pointer to value
  13.     tst.l    0(a0)            ! zero ?
  14.     bne    8f            !... NO exit immediately
  15.     tst.l    4(a0)            ! 2nd half tested
  16. 8:
  17.     move.l    (sp)+,a0        ! get return address
  18.     add.l    #4,sp            ! collapse stack
  19.     jmp    (a0)            ! return
  20.  
  21.