Commit | Line | Data |
---|---|---|
f93fd688 KB |
1 | /*- |
2 | * Copyright (c) 1990 The Regents of the University of California. | |
3 | * All rights reserved. | |
4 | * | |
5 | * This code is derived from software contributed to Berkeley by | |
6 | * the Systems Programming Group of the University of Utah Computer | |
7 | * Science Department. | |
8 | * | |
9 | * %sccs.include.redist.c% | |
10 | */ | |
11 | ||
12 | #if defined(LIBC_SCCS) && !defined(lint) | |
13 | .asciz "@(#)cmpsf2.s 5.1 (Berkeley) %G%" | |
14 | #endif /* LIBC_SCCS and not lint */ | |
15 | ||
16 | #include "DEFS.h" | |
17 | ||
18 | /* single > single: 1 */ | |
19 | /* single < single: -1 */ | |
20 | /* single == single: 0 */ | |
21 | ENTRY(__cmpsf2) | |
22 | fmoves sp@(4),fp0 | |
23 | fcmps sp@(8),fp0 | |
24 | fbgt Lagtb | |
25 | fslt d0 | |
26 | extbl d0 | |
27 | rts | |
28 | Lagtb: | |
29 | moveq #1,d0 | |
30 | rts |