Home | History | Annotate | Line # | Download | only in libf7
      1  1.1.1.3  mrg ;; Copyright (C) 2019-2024 Free Software Foundation, Inc.
      2      1.1  mrg ;;
      3      1.1  mrg ;; This file is part of LIBF7, which is part of GCC.
      4      1.1  mrg ;;
      5      1.1  mrg ;; GCC is free software; you can redistribute it and/or modify it under
      6      1.1  mrg ;; the terms of the GNU General Public License as published by the Free
      7      1.1  mrg ;; Software Foundation; either version 3, or (at your option) any later
      8      1.1  mrg ;; version.
      9      1.1  mrg ;;
     10      1.1  mrg ;; GCC is distributed in the hope that it will be useful, but WITHOUT ANY
     11      1.1  mrg ;; WARRANTY; without even the implied warranty of MERCHANTABILITY or
     12      1.1  mrg ;; FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
     13      1.1  mrg ;; for more details.
     14      1.1  mrg ;;
     15      1.1  mrg ;; Under Section 7 of GPL version 3, you are granted additional
     16      1.1  mrg ;; permissions described in the GCC Runtime Library Exception, version
     17      1.1  mrg ;; 3.1, as published by the Free Software Foundation.
     18      1.1  mrg ;;
     19      1.1  mrg ;; You should have received a copy of the GNU General Public License and
     20      1.1  mrg ;; a copy of the GCC Runtime Library Exception along with this program;
     21      1.1  mrg ;; see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
     22      1.1  mrg ;; <http://www.gnu.org/licenses/>.  */
     23      1.1  mrg 
     24      1.1  mrg ;; Auto-generated file, do not change by hand.
     25      1.1  mrg ;;
     26      1.1  mrg ;; Wrappers for double and long double functions to use functions that
     27      1.1  mrg ;; operate on f7_t, and get f7_t* and const f7_t*.
     28      1.1  mrg ;;
     29      1.1  mrg ;; Generated by: f7wraps.sh
     30      1.1  mrg ;; Included by : libf7-asm.sx
     31      1.1  mrg ;; WITH_LIBF7_MATH_FUNCTIONS=1
     32      1.1  mrg ;; WITH_LIBF7_MATH_SYMBOLS=1
     33      1.1  mrg 
     34      1.1  mrg ;; Functions that usually live in libgcc: __<name>df3 for <name> in:
     35      1.1  mrg ;; add sub mul div
     36      1.1  mrg 
     37      1.1  mrg ;; double __adddf3 (double, double)  ; add
     38      1.1  mrg #ifdef F7MOD_D_add_
     39      1.1  mrg _DEFUN __adddf3
     40      1.1  mrg     ALIAS __add
     41      1.1  mrg     .global F7_NAME(add)
     42      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(add)))
     43      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(add)))
     44      1.1  mrg     F7jmp   call_ddd
     45      1.1  mrg _ENDF __adddf3
     46      1.1  mrg #endif /* F7MOD_D_add_ */
     47      1.1  mrg 
     48      1.1  mrg ;; double __subdf3 (double, double)  ; sub
     49      1.1  mrg #ifdef F7MOD_D_sub_
     50      1.1  mrg _DEFUN __subdf3
     51      1.1  mrg     ALIAS __sub
     52      1.1  mrg     .global F7_NAME(sub)
     53      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(sub)))
     54      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(sub)))
     55      1.1  mrg     F7jmp   call_ddd
     56      1.1  mrg _ENDF __subdf3
     57      1.1  mrg #endif /* F7MOD_D_sub_ */
     58      1.1  mrg 
     59      1.1  mrg ;; double __muldf3 (double, double)  ; mul
     60      1.1  mrg #ifdef F7MOD_D_mul_
     61      1.1  mrg _DEFUN __muldf3
     62      1.1  mrg     ALIAS __mul
     63      1.1  mrg     .global F7_NAME(mul)
     64      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(mul)))
     65      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(mul)))
     66      1.1  mrg     F7jmp   call_ddd
     67      1.1  mrg _ENDF __muldf3
     68      1.1  mrg #endif /* F7MOD_D_mul_ */
     69      1.1  mrg 
     70      1.1  mrg ;; double __divdf3 (double, double)  ; div
     71      1.1  mrg #ifdef F7MOD_D_div_
     72      1.1  mrg _DEFUN __divdf3
     73      1.1  mrg     ALIAS __div
     74      1.1  mrg     .global F7_NAME(div)
     75      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(div)))
     76      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(div)))
     77      1.1  mrg     F7jmp   call_ddd
     78      1.1  mrg _ENDF __divdf3
     79      1.1  mrg #endif /* F7MOD_D_div_ */
     80      1.1  mrg 
     81      1.1  mrg ;; Functions that usually live in libgcc: __<name>df2 for <name> in:
     82      1.1  mrg ;; le lt ge gt ne eq unord
     83      1.1  mrg 
     84      1.1  mrg ;; bool __ledf2 (double, double)  ; le
     85      1.1  mrg #ifdef F7MOD_D_le_
     86      1.1  mrg _DEFUN __ledf2
     87      1.1  mrg     .global F7_NAME(le_impl)
     88      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(le_impl)))
     89      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(le_impl)))
     90      1.1  mrg     F7jmp   call_xdd
     91      1.1  mrg _ENDF __ledf2
     92      1.1  mrg #endif /* F7MOD_D_le_ */
     93      1.1  mrg 
     94      1.1  mrg ;; bool __ltdf2 (double, double)  ; lt
     95      1.1  mrg #ifdef F7MOD_D_lt_
     96      1.1  mrg _DEFUN __ltdf2
     97      1.1  mrg     .global F7_NAME(lt_impl)
     98      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(lt_impl)))
     99      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(lt_impl)))
    100      1.1  mrg     F7jmp   call_xdd
    101      1.1  mrg _ENDF __ltdf2
    102      1.1  mrg #endif /* F7MOD_D_lt_ */
    103      1.1  mrg 
    104      1.1  mrg ;; bool __gedf2 (double, double)  ; ge
    105      1.1  mrg #ifdef F7MOD_D_ge_
    106      1.1  mrg _DEFUN __gedf2
    107      1.1  mrg     .global F7_NAME(ge_impl)
    108      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(ge_impl)))
    109      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(ge_impl)))
    110      1.1  mrg     F7jmp   call_xdd
    111      1.1  mrg _ENDF __gedf2
    112      1.1  mrg #endif /* F7MOD_D_ge_ */
    113      1.1  mrg 
    114      1.1  mrg ;; bool __gtdf2 (double, double)  ; gt
    115      1.1  mrg #ifdef F7MOD_D_gt_
    116      1.1  mrg _DEFUN __gtdf2
    117      1.1  mrg     .global F7_NAME(gt_impl)
    118      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(gt_impl)))
    119      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(gt_impl)))
    120      1.1  mrg     F7jmp   call_xdd
    121      1.1  mrg _ENDF __gtdf2
    122      1.1  mrg #endif /* F7MOD_D_gt_ */
    123      1.1  mrg 
    124      1.1  mrg ;; bool __nedf2 (double, double)  ; ne
    125      1.1  mrg #ifdef F7MOD_D_ne_
    126      1.1  mrg _DEFUN __nedf2
    127      1.1  mrg     .global F7_NAME(ne_impl)
    128      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(ne_impl)))
    129      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(ne_impl)))
    130      1.1  mrg     F7jmp   call_xdd
    131      1.1  mrg _ENDF __nedf2
    132      1.1  mrg #endif /* F7MOD_D_ne_ */
    133      1.1  mrg 
    134      1.1  mrg ;; bool __eqdf2 (double, double)  ; eq
    135      1.1  mrg #ifdef F7MOD_D_eq_
    136      1.1  mrg _DEFUN __eqdf2
    137      1.1  mrg     .global F7_NAME(eq_impl)
    138      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(eq_impl)))
    139      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(eq_impl)))
    140      1.1  mrg     F7jmp   call_xdd
    141      1.1  mrg _ENDF __eqdf2
    142      1.1  mrg #endif /* F7MOD_D_eq_ */
    143      1.1  mrg 
    144      1.1  mrg ;; bool __unorddf2 (double, double)  ; unord
    145      1.1  mrg #ifdef F7MOD_D_unord_
    146      1.1  mrg _DEFUN __unorddf2
    147      1.1  mrg     .global F7_NAME(unord_impl)
    148      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(unord_impl)))
    149      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(unord_impl)))
    150      1.1  mrg     F7jmp   call_xdd
    151      1.1  mrg _ENDF __unorddf2
    152      1.1  mrg #endif /* F7MOD_D_unord_ */
    153      1.1  mrg 
    154      1.1  mrg ;; Functions that usually live in libgcc: __<name> for <name> in:
    155      1.1  mrg ;; fixdfsi fixdfdi fixunsdfdi fixunsdfsi truncdfsf2
    156      1.1  mrg 
    157      1.1  mrg ;; type_t __fixdfsi (double)  ; fixdfsi
    158      1.1  mrg #ifdef F7MOD_D_fixdfsi_
    159      1.1  mrg _DEFUN __fixdfsi
    160      1.1  mrg     .global F7_NAME(fixdfsi)
    161      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(fixdfsi)))
    162      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(fixdfsi)))
    163      1.1  mrg     F7jmp   call_xd
    164      1.1  mrg _ENDF __fixdfsi
    165      1.1  mrg #endif /* F7MOD_D_fixdfsi_ */
    166      1.1  mrg 
    167      1.1  mrg ;; type_t __fixdfdi (double)  ; fixdfdi
    168      1.1  mrg #ifdef F7MOD_D_fixdfdi_
    169      1.1  mrg _DEFUN __fixdfdi
    170      1.1  mrg     .global F7_NAME(fixdfdi)
    171      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(fixdfdi)))
    172      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(fixdfdi)))
    173      1.1  mrg     F7jmp   call_xd
    174      1.1  mrg _ENDF __fixdfdi
    175      1.1  mrg #endif /* F7MOD_D_fixdfdi_ */
    176      1.1  mrg 
    177      1.1  mrg ;; type_t __fixunsdfdi (double)  ; fixunsdfdi
    178      1.1  mrg #ifdef F7MOD_D_fixunsdfdi_
    179      1.1  mrg _DEFUN __fixunsdfdi
    180      1.1  mrg     .global F7_NAME(fixunsdfdi)
    181      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(fixunsdfdi)))
    182      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(fixunsdfdi)))
    183      1.1  mrg     F7jmp   call_xd
    184      1.1  mrg _ENDF __fixunsdfdi
    185      1.1  mrg #endif /* F7MOD_D_fixunsdfdi_ */
    186      1.1  mrg 
    187      1.1  mrg ;; type_t __fixunsdfsi (double)  ; fixunsdfsi
    188      1.1  mrg #ifdef F7MOD_D_fixunsdfsi_
    189      1.1  mrg _DEFUN __fixunsdfsi
    190      1.1  mrg     .global F7_NAME(fixunsdfsi)
    191      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(fixunsdfsi)))
    192      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(fixunsdfsi)))
    193      1.1  mrg     F7jmp   call_xd
    194      1.1  mrg _ENDF __fixunsdfsi
    195      1.1  mrg #endif /* F7MOD_D_fixunsdfsi_ */
    196      1.1  mrg 
    197      1.1  mrg ;; type_t __truncdfsf2 (double)  ; truncdfsf2
    198      1.1  mrg #ifdef F7MOD_D_truncdfsf2_
    199      1.1  mrg _DEFUN __truncdfsf2
    200      1.1  mrg     .global F7_NAME(truncdfsf2)
    201      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(truncdfsf2)))
    202      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(truncdfsf2)))
    203      1.1  mrg     F7jmp   call_xd
    204      1.1  mrg _ENDF __truncdfsf2
    205      1.1  mrg #endif /* F7MOD_D_truncdfsf2_ */
    206      1.1  mrg 
    207      1.1  mrg ;; Functions that usually live in libgcc: __<name> for <name> in:
    208      1.1  mrg ;; floatunsidf floatsidf extendsfdf2
    209      1.1  mrg 
    210      1.1  mrg ;; double __floatunsidf (type_t)  ; floatunsidf
    211      1.1  mrg #ifdef F7MOD_D_floatunsidf_
    212      1.1  mrg _DEFUN __floatunsidf
    213      1.1  mrg     .global F7_NAME(floatunsidf)
    214      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(floatunsidf)))
    215      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(floatunsidf)))
    216      1.1  mrg     F7jmp   call_dx
    217      1.1  mrg _ENDF __floatunsidf
    218      1.1  mrg #endif /* F7MOD_D_floatunsidf_ */
    219      1.1  mrg 
    220      1.1  mrg ;; double __floatsidf (type_t)  ; floatsidf
    221      1.1  mrg #ifdef F7MOD_D_floatsidf_
    222      1.1  mrg _DEFUN __floatsidf
    223      1.1  mrg     .global F7_NAME(floatsidf)
    224      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(floatsidf)))
    225      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(floatsidf)))
    226      1.1  mrg     F7jmp   call_dx
    227      1.1  mrg _ENDF __floatsidf
    228      1.1  mrg #endif /* F7MOD_D_floatsidf_ */
    229      1.1  mrg 
    230      1.1  mrg ;; double __extendsfdf2 (type_t)  ; extendsfdf2
    231      1.1  mrg #ifdef F7MOD_D_extendsfdf2_
    232      1.1  mrg _DEFUN __extendsfdf2
    233      1.1  mrg     .global F7_NAME(extendsfdf2)
    234      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(extendsfdf2)))
    235      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(extendsfdf2)))
    236      1.1  mrg     F7jmp   call_dx
    237      1.1  mrg _ENDF __extendsfdf2
    238      1.1  mrg #endif /* F7MOD_D_extendsfdf2_ */
    239      1.1  mrg 
    240      1.1  mrg ;; Functions that usually live in libm:  Depending on [long] double layout,
    241      1.1  mrg ;; define <name> and <name>l as weak alias(es) of __<name> for <name> in:
    242      1.1  mrg ;; pow fmin fmax fmod hypot atan2
    243      1.1  mrg 
    244      1.1  mrg ;; double __pow (double, double)
    245      1.1  mrg #ifdef F7MOD_D_pow_
    246      1.1  mrg _DEFUN __pow
    247      1.1  mrg     DALIAS pow
    248      1.1  mrg     LALIAS powl
    249      1.1  mrg     .global F7_NAME(pow)
    250      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(pow)))
    251      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(pow)))
    252      1.1  mrg     F7jmp   call_ddd
    253      1.1  mrg _ENDF __pow
    254      1.1  mrg #endif /* F7MOD_D_pow_ */
    255      1.1  mrg 
    256      1.1  mrg ;; double __fmin (double, double)
    257      1.1  mrg #ifdef F7MOD_D_fmin_
    258      1.1  mrg _DEFUN __fmin
    259      1.1  mrg     DALIAS fmin
    260      1.1  mrg     LALIAS fminl
    261      1.1  mrg     .global F7_NAME(fmin)
    262      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(fmin)))
    263      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(fmin)))
    264      1.1  mrg     F7jmp   call_ddd
    265      1.1  mrg _ENDF __fmin
    266      1.1  mrg #endif /* F7MOD_D_fmin_ */
    267      1.1  mrg 
    268      1.1  mrg ;; double __fmax (double, double)
    269      1.1  mrg #ifdef F7MOD_D_fmax_
    270      1.1  mrg _DEFUN __fmax
    271      1.1  mrg     DALIAS fmax
    272      1.1  mrg     LALIAS fmaxl
    273      1.1  mrg     .global F7_NAME(fmax)
    274      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(fmax)))
    275      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(fmax)))
    276      1.1  mrg     F7jmp   call_ddd
    277      1.1  mrg _ENDF __fmax
    278      1.1  mrg #endif /* F7MOD_D_fmax_ */
    279      1.1  mrg 
    280      1.1  mrg ;; double __fmod (double, double)
    281      1.1  mrg #ifdef F7MOD_D_fmod_
    282      1.1  mrg _DEFUN __fmod
    283      1.1  mrg     DALIAS fmod
    284      1.1  mrg     LALIAS fmodl
    285      1.1  mrg     .global F7_NAME(fmod)
    286      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(fmod)))
    287      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(fmod)))
    288      1.1  mrg     F7jmp   call_ddd
    289      1.1  mrg _ENDF __fmod
    290      1.1  mrg #endif /* F7MOD_D_fmod_ */
    291      1.1  mrg 
    292      1.1  mrg ;; double __hypot (double, double)
    293      1.1  mrg #ifdef F7MOD_D_hypot_
    294      1.1  mrg _DEFUN __hypot
    295      1.1  mrg     DALIAS hypot
    296      1.1  mrg     LALIAS hypotl
    297      1.1  mrg     .global F7_NAME(hypot)
    298      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(hypot)))
    299      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(hypot)))
    300      1.1  mrg     F7jmp   call_ddd
    301      1.1  mrg _ENDF __hypot
    302      1.1  mrg #endif /* F7MOD_D_hypot_ */
    303      1.1  mrg 
    304      1.1  mrg ;; double __atan2 (double, double)
    305      1.1  mrg #ifdef F7MOD_D_atan2_
    306      1.1  mrg _DEFUN __atan2
    307      1.1  mrg     DALIAS atan2
    308      1.1  mrg     LALIAS atan2l
    309      1.1  mrg     .global F7_NAME(atan2)
    310      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(atan2)))
    311      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(atan2)))
    312      1.1  mrg     F7jmp   call_ddd
    313      1.1  mrg _ENDF __atan2
    314      1.1  mrg #endif /* F7MOD_D_atan2_ */
    315      1.1  mrg 
    316      1.1  mrg ;; Functions that usually live in libm:  Depending on [long] double layout,
    317      1.1  mrg ;; define <name> and <name>l as weak alias(es) of __<name> for <name> in:
    318      1.1  mrg ;; ldexp frexp
    319      1.1  mrg 
    320      1.1  mrg ;; double __ldexp (double, word_t)
    321      1.1  mrg #ifdef F7MOD_D_ldexp_
    322      1.1  mrg _DEFUN __ldexp
    323      1.1  mrg     DALIAS ldexp
    324      1.1  mrg     LALIAS ldexpl
    325      1.1  mrg     .global F7_NAME(ldexp)
    326      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(ldexp)))
    327      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(ldexp)))
    328      1.1  mrg     F7jmp   call_ddx
    329      1.1  mrg _ENDF __ldexp
    330      1.1  mrg #endif /* F7MOD_D_ldexp_ */
    331      1.1  mrg 
    332      1.1  mrg ;; double __frexp (double, word_t)
    333      1.1  mrg #ifdef F7MOD_D_frexp_
    334      1.1  mrg _DEFUN __frexp
    335      1.1  mrg     DALIAS frexp
    336      1.1  mrg     LALIAS frexpl
    337      1.1  mrg     .global F7_NAME(frexp)
    338      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(frexp)))
    339      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(frexp)))
    340      1.1  mrg     F7jmp   call_ddx
    341      1.1  mrg _ENDF __frexp
    342      1.1  mrg #endif /* F7MOD_D_frexp_ */
    343      1.1  mrg 
    344      1.1  mrg ;; Functions that usually live in libm:  Depending on [long] double layout,
    345      1.1  mrg ;; define <name> and <name>l as weak alias(es) of __<name> for <name> in:
    346      1.1  mrg ;; sqrt cbrt exp exp10 pow10 log log10 log2 sin cos tan cotan asin acos atan ceil floor trunc round sinh cosh tanh
    347      1.1  mrg 
    348      1.1  mrg ;; double __sqrt (double)
    349      1.1  mrg #ifdef F7MOD_D_sqrt_
    350      1.1  mrg _DEFUN __sqrt
    351      1.1  mrg     DALIAS sqrt
    352      1.1  mrg     LALIAS sqrtl
    353      1.1  mrg     .global F7_NAME(sqrt)
    354      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(sqrt)))
    355      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(sqrt)))
    356      1.1  mrg     F7jmp   call_dd
    357      1.1  mrg _ENDF __sqrt
    358      1.1  mrg #endif /* F7MOD_D_sqrt_ */
    359      1.1  mrg 
    360      1.1  mrg ;; double __cbrt (double)
    361      1.1  mrg #ifdef F7MOD_D_cbrt_
    362      1.1  mrg _DEFUN __cbrt
    363      1.1  mrg     DALIAS cbrt
    364      1.1  mrg     LALIAS cbrtl
    365      1.1  mrg     .global F7_NAME(cbrt)
    366      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(cbrt)))
    367      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(cbrt)))
    368      1.1  mrg     F7jmp   call_dd
    369      1.1  mrg _ENDF __cbrt
    370      1.1  mrg #endif /* F7MOD_D_cbrt_ */
    371      1.1  mrg 
    372      1.1  mrg ;; double __exp (double)
    373      1.1  mrg #ifdef F7MOD_D_exp_
    374      1.1  mrg _DEFUN __exp
    375      1.1  mrg     DALIAS exp
    376      1.1  mrg     LALIAS expl
    377      1.1  mrg     .global F7_NAME(exp)
    378      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(exp)))
    379      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(exp)))
    380      1.1  mrg     F7jmp   call_dd
    381      1.1  mrg _ENDF __exp
    382      1.1  mrg #endif /* F7MOD_D_exp_ */
    383      1.1  mrg 
    384      1.1  mrg ;; double __exp10 (double)
    385      1.1  mrg #ifdef F7MOD_D_exp10_
    386      1.1  mrg _DEFUN __exp10
    387      1.1  mrg     DALIAS exp10
    388      1.1  mrg     LALIAS exp10l
    389      1.1  mrg     .global F7_NAME(exp10)
    390      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(exp10)))
    391      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(exp10)))
    392      1.1  mrg     F7jmp   call_dd
    393      1.1  mrg _ENDF __exp10
    394      1.1  mrg #endif /* F7MOD_D_exp10_ */
    395      1.1  mrg 
    396      1.1  mrg ;; double __pow10 (double)
    397      1.1  mrg #ifdef F7MOD_D_pow10_
    398      1.1  mrg _DEFUN __pow10
    399      1.1  mrg     DALIAS pow10
    400      1.1  mrg     LALIAS pow10l
    401      1.1  mrg     .global F7_NAME(pow10)
    402      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(pow10)))
    403      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(pow10)))
    404      1.1  mrg     F7jmp   call_dd
    405      1.1  mrg _ENDF __pow10
    406      1.1  mrg #endif /* F7MOD_D_pow10_ */
    407      1.1  mrg 
    408      1.1  mrg ;; double __log (double)
    409      1.1  mrg #ifdef F7MOD_D_log_
    410      1.1  mrg _DEFUN __log
    411      1.1  mrg     DALIAS log
    412      1.1  mrg     LALIAS logl
    413      1.1  mrg     .global F7_NAME(log)
    414      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(log)))
    415      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(log)))
    416      1.1  mrg     F7jmp   call_dd
    417      1.1  mrg _ENDF __log
    418      1.1  mrg #endif /* F7MOD_D_log_ */
    419      1.1  mrg 
    420      1.1  mrg ;; double __log10 (double)
    421      1.1  mrg #ifdef F7MOD_D_log10_
    422      1.1  mrg _DEFUN __log10
    423      1.1  mrg     DALIAS log10
    424      1.1  mrg     LALIAS log10l
    425      1.1  mrg     .global F7_NAME(log10)
    426      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(log10)))
    427      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(log10)))
    428      1.1  mrg     F7jmp   call_dd
    429      1.1  mrg _ENDF __log10
    430      1.1  mrg #endif /* F7MOD_D_log10_ */
    431      1.1  mrg 
    432      1.1  mrg ;; double __log2 (double)
    433      1.1  mrg #ifdef F7MOD_D_log2_
    434      1.1  mrg _DEFUN __log2
    435      1.1  mrg     DALIAS log2
    436      1.1  mrg     LALIAS log2l
    437      1.1  mrg     .global F7_NAME(log2)
    438      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(log2)))
    439      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(log2)))
    440      1.1  mrg     F7jmp   call_dd
    441      1.1  mrg _ENDF __log2
    442      1.1  mrg #endif /* F7MOD_D_log2_ */
    443      1.1  mrg 
    444      1.1  mrg ;; double __sin (double)
    445      1.1  mrg #ifdef F7MOD_D_sin_
    446      1.1  mrg _DEFUN __sin
    447      1.1  mrg     DALIAS sin
    448      1.1  mrg     LALIAS sinl
    449      1.1  mrg     .global F7_NAME(sin)
    450      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(sin)))
    451      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(sin)))
    452      1.1  mrg     F7jmp   call_dd
    453      1.1  mrg _ENDF __sin
    454      1.1  mrg #endif /* F7MOD_D_sin_ */
    455      1.1  mrg 
    456      1.1  mrg ;; double __cos (double)
    457      1.1  mrg #ifdef F7MOD_D_cos_
    458      1.1  mrg _DEFUN __cos
    459      1.1  mrg     DALIAS cos
    460      1.1  mrg     LALIAS cosl
    461      1.1  mrg     .global F7_NAME(cos)
    462      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(cos)))
    463      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(cos)))
    464      1.1  mrg     F7jmp   call_dd
    465      1.1  mrg _ENDF __cos
    466      1.1  mrg #endif /* F7MOD_D_cos_ */
    467      1.1  mrg 
    468      1.1  mrg ;; double __tan (double)
    469      1.1  mrg #ifdef F7MOD_D_tan_
    470      1.1  mrg _DEFUN __tan
    471      1.1  mrg     DALIAS tan
    472      1.1  mrg     LALIAS tanl
    473      1.1  mrg     .global F7_NAME(tan)
    474      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(tan)))
    475      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(tan)))
    476      1.1  mrg     F7jmp   call_dd
    477      1.1  mrg _ENDF __tan
    478      1.1  mrg #endif /* F7MOD_D_tan_ */
    479      1.1  mrg 
    480      1.1  mrg ;; double __cotan (double)
    481      1.1  mrg #ifdef F7MOD_D_cotan_
    482      1.1  mrg _DEFUN __cotan
    483      1.1  mrg     DALIAS cotan
    484      1.1  mrg     LALIAS cotanl
    485      1.1  mrg     .global F7_NAME(cotan)
    486      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(cotan)))
    487      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(cotan)))
    488      1.1  mrg     F7jmp   call_dd
    489      1.1  mrg _ENDF __cotan
    490      1.1  mrg #endif /* F7MOD_D_cotan_ */
    491      1.1  mrg 
    492      1.1  mrg ;; double __asin (double)
    493      1.1  mrg #ifdef F7MOD_D_asin_
    494      1.1  mrg _DEFUN __asin
    495      1.1  mrg     DALIAS asin
    496      1.1  mrg     LALIAS asinl
    497      1.1  mrg     .global F7_NAME(asin)
    498      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(asin)))
    499      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(asin)))
    500      1.1  mrg     F7jmp   call_dd
    501      1.1  mrg _ENDF __asin
    502      1.1  mrg #endif /* F7MOD_D_asin_ */
    503      1.1  mrg 
    504      1.1  mrg ;; double __acos (double)
    505      1.1  mrg #ifdef F7MOD_D_acos_
    506      1.1  mrg _DEFUN __acos
    507      1.1  mrg     DALIAS acos
    508      1.1  mrg     LALIAS acosl
    509      1.1  mrg     .global F7_NAME(acos)
    510      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(acos)))
    511      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(acos)))
    512      1.1  mrg     F7jmp   call_dd
    513      1.1  mrg _ENDF __acos
    514      1.1  mrg #endif /* F7MOD_D_acos_ */
    515      1.1  mrg 
    516      1.1  mrg ;; double __atan (double)
    517      1.1  mrg #ifdef F7MOD_D_atan_
    518      1.1  mrg _DEFUN __atan
    519      1.1  mrg     DALIAS atan
    520      1.1  mrg     LALIAS atanl
    521      1.1  mrg     .global F7_NAME(atan)
    522      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(atan)))
    523      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(atan)))
    524      1.1  mrg     F7jmp   call_dd
    525      1.1  mrg _ENDF __atan
    526      1.1  mrg #endif /* F7MOD_D_atan_ */
    527      1.1  mrg 
    528      1.1  mrg ;; double __ceil (double)
    529      1.1  mrg #ifdef F7MOD_D_ceil_
    530      1.1  mrg _DEFUN __ceil
    531      1.1  mrg     DALIAS ceil
    532      1.1  mrg     LALIAS ceill
    533      1.1  mrg     .global F7_NAME(ceil)
    534      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(ceil)))
    535      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(ceil)))
    536      1.1  mrg     F7jmp   call_dd
    537      1.1  mrg _ENDF __ceil
    538      1.1  mrg #endif /* F7MOD_D_ceil_ */
    539      1.1  mrg 
    540      1.1  mrg ;; double __floor (double)
    541      1.1  mrg #ifdef F7MOD_D_floor_
    542      1.1  mrg _DEFUN __floor
    543      1.1  mrg     DALIAS floor
    544      1.1  mrg     LALIAS floorl
    545      1.1  mrg     .global F7_NAME(floor)
    546      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(floor)))
    547      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(floor)))
    548      1.1  mrg     F7jmp   call_dd
    549      1.1  mrg _ENDF __floor
    550      1.1  mrg #endif /* F7MOD_D_floor_ */
    551      1.1  mrg 
    552      1.1  mrg ;; double __trunc (double)
    553      1.1  mrg #ifdef F7MOD_D_trunc_
    554      1.1  mrg _DEFUN __trunc
    555      1.1  mrg     DALIAS trunc
    556      1.1  mrg     LALIAS truncl
    557      1.1  mrg     .global F7_NAME(trunc)
    558      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(trunc)))
    559      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(trunc)))
    560      1.1  mrg     F7jmp   call_dd
    561      1.1  mrg _ENDF __trunc
    562      1.1  mrg #endif /* F7MOD_D_trunc_ */
    563      1.1  mrg 
    564      1.1  mrg ;; double __round (double)
    565      1.1  mrg #ifdef F7MOD_D_round_
    566      1.1  mrg _DEFUN __round
    567      1.1  mrg     DALIAS round
    568      1.1  mrg     LALIAS roundl
    569      1.1  mrg     .global F7_NAME(round)
    570      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(round)))
    571      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(round)))
    572      1.1  mrg     F7jmp   call_dd
    573      1.1  mrg _ENDF __round
    574      1.1  mrg #endif /* F7MOD_D_round_ */
    575      1.1  mrg 
    576      1.1  mrg ;; double __sinh (double)
    577      1.1  mrg #ifdef F7MOD_D_sinh_
    578      1.1  mrg _DEFUN __sinh
    579      1.1  mrg     DALIAS sinh
    580      1.1  mrg     LALIAS sinhl
    581      1.1  mrg     .global F7_NAME(sinh)
    582      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(sinh)))
    583      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(sinh)))
    584      1.1  mrg     F7jmp   call_dd
    585      1.1  mrg _ENDF __sinh
    586      1.1  mrg #endif /* F7MOD_D_sinh_ */
    587      1.1  mrg 
    588      1.1  mrg ;; double __cosh (double)
    589      1.1  mrg #ifdef F7MOD_D_cosh_
    590      1.1  mrg _DEFUN __cosh
    591      1.1  mrg     DALIAS cosh
    592      1.1  mrg     LALIAS coshl
    593      1.1  mrg     .global F7_NAME(cosh)
    594      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(cosh)))
    595      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(cosh)))
    596      1.1  mrg     F7jmp   call_dd
    597      1.1  mrg _ENDF __cosh
    598      1.1  mrg #endif /* F7MOD_D_cosh_ */
    599      1.1  mrg 
    600      1.1  mrg ;; double __tanh (double)
    601      1.1  mrg #ifdef F7MOD_D_tanh_
    602      1.1  mrg _DEFUN __tanh
    603      1.1  mrg     DALIAS tanh
    604      1.1  mrg     LALIAS tanhl
    605      1.1  mrg     .global F7_NAME(tanh)
    606      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(tanh)))
    607      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(tanh)))
    608      1.1  mrg     F7jmp   call_dd
    609      1.1  mrg _ENDF __tanh
    610      1.1  mrg #endif /* F7MOD_D_tanh_ */
    611      1.1  mrg 
    612      1.1  mrg ;; Functions that usually live in libm:  Depending on [long] double layout,
    613      1.1  mrg ;; define <name> and <name>l as weak alias(es) of __<name> for <name> in:
    614      1.1  mrg ;; lrint lround
    615      1.1  mrg 
    616      1.1  mrg ;; type_t __lrint (double)
    617      1.1  mrg #ifdef F7MOD_D_lrint_
    618      1.1  mrg _DEFUN __lrint
    619      1.1  mrg     DALIAS lrint
    620      1.1  mrg     LALIAS lrintl
    621      1.1  mrg     .global F7_NAME(lrint)
    622      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(lrint)))
    623      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(lrint)))
    624      1.1  mrg     F7jmp   call_xd
    625      1.1  mrg _ENDF __lrint
    626      1.1  mrg #endif /* F7MOD_D_lrint_ */
    627      1.1  mrg 
    628      1.1  mrg ;; type_t __lround (double)
    629      1.1  mrg #ifdef F7MOD_D_lround_
    630      1.1  mrg _DEFUN __lround
    631      1.1  mrg     DALIAS lround
    632      1.1  mrg     LALIAS lroundl
    633      1.1  mrg     .global F7_NAME(lround)
    634      1.1  mrg     ldi     ZH,     hi8(gs(F7_NAME(lround)))
    635      1.1  mrg     ldi     ZL,     lo8(gs(F7_NAME(lround)))
    636      1.1  mrg     F7jmp   call_xd
    637      1.1  mrg _ENDF __lround
    638      1.1  mrg #endif /* F7MOD_D_lround_ */
    639