home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Club Amiga de Montreal - CAM
/
CAM_CD_1.iso
/
files
/
213a.lha
/
Sozobon-C
/
libfp
/
fpcmp.s
< prev
next >
Wrap
Text File
|
1996-02-14
|
723b
|
35 lines
* Copyright (c) 1988 by Sozobon, Limited. Author: Johann Ruegg
*
* Permission is granted to anyone to use this software for any purpose
* on any computer system, and to redistribute it freely, with the
* following restrictions:
* 1) No charge may be made other than reasonable charges for reproduction.
* 2) Modified versions must be clearly marked as such.
* 3) The authors are not responsible for any harmful consequences
* of using this software, even if they result from defects in it.
*
.globl fpcmp
.globl _fpcmp
fpcmp:
_fpcmp:
move.l 4(sp),d0
move.l 8(sp),d1
cmp.b d1,d0
bne L1
cmp.l d1,d0
L1:
rts
.globl fpneg
.globl _fpneg
fpneg:
_fpneg:
move.l 4(sp),d0
tst.b d0
beq L2
eor.b #$80,d0
L2:
rts