1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright 1989 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 #pragma ident "%Z%%M% %I% %E% SMI"
28
29 /* integer function _Q_feq, _Q_fne, _Q_fgt, _Q_fge, _Q_flt, _Q_fle */
30
31 #include "_Qquad.h"
32
33 int
_Q_feq(QUAD x,QUAD y)34 _Q_feq(QUAD x, QUAD y)
35 {
36 enum fcc_type fcc;
37 fcc = _Q_cmp(x,y);
38 return (fcc_equal==fcc);
39 }
40
41 int
_Q_fne(QUAD x,QUAD y)42 _Q_fne(QUAD x, QUAD y)
43 {
44 enum fcc_type fcc;
45 fcc = _Q_cmp(x,y);
46 return (fcc_equal!=fcc);
47 }
48
49 int
_Q_fgt(QUAD x,QUAD y)50 _Q_fgt(QUAD x, QUAD y)
51 {
52 enum fcc_type fcc;
53 fcc = _Q_cmpe(x,y);
54 return (fcc_greater==fcc);
55 }
56
57 int
_Q_fge(QUAD x,QUAD y)58 _Q_fge(QUAD x, QUAD y)
59 {
60 enum fcc_type fcc;
61 fcc = _Q_cmpe(x,y);
62 return (fcc_greater==fcc||fcc_equal==fcc);
63 }
64
65 int
_Q_flt(QUAD x,QUAD y)66 _Q_flt(QUAD x, QUAD y)
67 {
68 enum fcc_type fcc;
69 fcc = _Q_cmpe(x,y);
70 return (fcc_less==fcc);
71 }
72
73 int
_Q_fle(QUAD x,QUAD y)74 _Q_fle(QUAD x, QUAD y)
75 {
76 enum fcc_type fcc;
77 fcc = _Q_cmpe(x,y);
78 return (fcc_less==fcc||fcc_equal==fcc);
79 }
80