Home | History | Annotate | Download | only in common
      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
     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
     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
     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
     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
     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
     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