13cab2bb3Spatrick //===-- lib/comparesf2.c - Single-precision comparisons -----------*- C -*-===//
23cab2bb3Spatrick //
33cab2bb3Spatrick // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
43cab2bb3Spatrick // See https://llvm.org/LICENSE.txt for license information.
53cab2bb3Spatrick // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
63cab2bb3Spatrick //
73cab2bb3Spatrick //===----------------------------------------------------------------------===//
83cab2bb3Spatrick //
93cab2bb3Spatrick // This file implements the following soft-fp_t comparison routines:
103cab2bb3Spatrick //
113cab2bb3Spatrick // __eqsf2 __gesf2 __unordsf2
123cab2bb3Spatrick // __lesf2 __gtsf2
133cab2bb3Spatrick // __ltsf2
143cab2bb3Spatrick // __nesf2
153cab2bb3Spatrick //
163cab2bb3Spatrick // The semantics of the routines grouped in each column are identical, so there
173cab2bb3Spatrick // is a single implementation for each, and wrappers to provide the other names.
183cab2bb3Spatrick //
193cab2bb3Spatrick // The main routines behave as follows:
203cab2bb3Spatrick //
213cab2bb3Spatrick // __lesf2(a,b) returns -1 if a < b
223cab2bb3Spatrick // 0 if a == b
233cab2bb3Spatrick // 1 if a > b
243cab2bb3Spatrick // 1 if either a or b is NaN
253cab2bb3Spatrick //
263cab2bb3Spatrick // __gesf2(a,b) returns -1 if a < b
273cab2bb3Spatrick // 0 if a == b
283cab2bb3Spatrick // 1 if a > b
293cab2bb3Spatrick // -1 if either a or b is NaN
303cab2bb3Spatrick //
313cab2bb3Spatrick // __unordsf2(a,b) returns 0 if both a and b are numbers
323cab2bb3Spatrick // 1 if either a or b is NaN
333cab2bb3Spatrick //
343cab2bb3Spatrick // Note that __lesf2( ) and __gesf2( ) are identical except in their handling of
353cab2bb3Spatrick // NaN values.
363cab2bb3Spatrick //
373cab2bb3Spatrick //===----------------------------------------------------------------------===//
383cab2bb3Spatrick
393cab2bb3Spatrick #define SINGLE_PRECISION
403cab2bb3Spatrick #include "fp_lib.h"
413cab2bb3Spatrick
42*d89ec533Spatrick #include "fp_compare_impl.inc"
433cab2bb3Spatrick
__lesf2(fp_t a,fp_t b)44*d89ec533Spatrick COMPILER_RT_ABI CMP_RESULT __lesf2(fp_t a, fp_t b) { return __leXf2__(a, b); }
453cab2bb3Spatrick
463cab2bb3Spatrick #if defined(__ELF__)
473cab2bb3Spatrick // Alias for libgcc compatibility
COMPILER_RT_ALIAS(__lesf2,__cmpsf2)483cab2bb3Spatrick COMPILER_RT_ALIAS(__lesf2, __cmpsf2)
493cab2bb3Spatrick #endif
503cab2bb3Spatrick COMPILER_RT_ALIAS(__lesf2, __eqsf2)
513cab2bb3Spatrick COMPILER_RT_ALIAS(__lesf2, __ltsf2)
523cab2bb3Spatrick COMPILER_RT_ALIAS(__lesf2, __nesf2)
533cab2bb3Spatrick
54*d89ec533Spatrick COMPILER_RT_ABI CMP_RESULT __gesf2(fp_t a, fp_t b) { return __geXf2__(a, b); }
553cab2bb3Spatrick
COMPILER_RT_ALIAS(__gesf2,__gtsf2)563cab2bb3Spatrick COMPILER_RT_ALIAS(__gesf2, __gtsf2)
573cab2bb3Spatrick
58*d89ec533Spatrick COMPILER_RT_ABI CMP_RESULT __unordsf2(fp_t a, fp_t b) {
59*d89ec533Spatrick return __unordXf2__(a, b);
603cab2bb3Spatrick }
613cab2bb3Spatrick
623cab2bb3Spatrick #if defined(__ARM_EABI__)
633cab2bb3Spatrick #if defined(COMPILER_RT_ARMHF_TARGET)
__aeabi_fcmpun(fp_t a,fp_t b)643cab2bb3Spatrick AEABI_RTABI int __aeabi_fcmpun(fp_t a, fp_t b) { return __unordsf2(a, b); }
653cab2bb3Spatrick #else
COMPILER_RT_ALIAS(__unordsf2,__aeabi_fcmpun)663cab2bb3Spatrick COMPILER_RT_ALIAS(__unordsf2, __aeabi_fcmpun)
673cab2bb3Spatrick #endif
683cab2bb3Spatrick #endif
693cab2bb3Spatrick
703cab2bb3Spatrick #if defined(_WIN32) && !defined(__MINGW32__)
713cab2bb3Spatrick // The alias mechanism doesn't work on Windows except for MinGW, so emit
723cab2bb3Spatrick // wrapper functions.
733cab2bb3Spatrick int __eqsf2(fp_t a, fp_t b) { return __lesf2(a, b); }
__ltsf2(fp_t a,fp_t b)743cab2bb3Spatrick int __ltsf2(fp_t a, fp_t b) { return __lesf2(a, b); }
__nesf2(fp_t a,fp_t b)753cab2bb3Spatrick int __nesf2(fp_t a, fp_t b) { return __lesf2(a, b); }
__gtsf2(fp_t a,fp_t b)763cab2bb3Spatrick int __gtsf2(fp_t a, fp_t b) { return __gesf2(a, b); }
773cab2bb3Spatrick #endif
78