111 changed files with 1285 additions and 2075 deletions
@ -1,54 +0,0 @@
@@ -1,54 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/math.h" |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_fpclassifyl: |
||||
push %rbp |
||||
mov %rsp,%rbp |
||||
mov 24(%rbp),%rax |
||||
mov 16(%rbp),%rdx |
||||
and $0x7fff,%ax |
||||
mov %rdx,%rcx |
||||
shr $63,%rcx |
||||
movzwl %ax,%esi |
||||
or %ecx,%esi |
||||
jne 2f |
||||
cmp $1,%rdx |
||||
sbb %eax,%eax |
||||
add $3,%eax |
||||
jmp 1f |
||||
2: cmp $0x7fff,%ax |
||||
jne 4f |
||||
xor %eax,%eax |
||||
test %rcx,%rcx |
||||
je 1f |
||||
xor %eax,%eax |
||||
add %rdx,%rdx |
||||
sete %al |
||||
jmp 1f |
||||
4: mov %ecx,%eax |
||||
neg %eax |
||||
and $FP_NORMAL,%eax |
||||
1: pop %rbp |
||||
ret |
||||
.endfn tinymath_fpclassifyl,globl |
||||
.alias tinymath_fpclassifyl,__fpclassifyl |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_isgreaterf: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comiss %xmm1,%xmm0 |
||||
seta %al |
||||
.leafepilogue |
||||
.endfn tinymath_isgreaterf,globl |
||||
.alias tinymath_isgreaterf,isgreaterf |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_isgreaterequal: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comisd %xmm1,%xmm0 |
||||
setnb %al |
||||
.leafepilogue |
||||
.endfn tinymath_isgreaterequal,globl |
||||
.alias tinymath_isgreaterequal,isgreaterequal |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_isgreaterequalf: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comiss %xmm1,%xmm0 |
||||
setnb %al |
||||
.leafepilogue |
||||
.endfn tinymath_isgreaterequalf,globl |
||||
.alias tinymath_isgreaterequalf,isgreaterequalf |
@ -1,36 +0,0 @@
@@ -1,36 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_isgreaterequall: |
||||
push %rbp |
||||
mov %rsp,%rbp |
||||
.profilable |
||||
fldt 32(%rbp) |
||||
fldt 16(%rbp) |
||||
xor %eax,%eax |
||||
fcomip %st(1),%st |
||||
fstp %st |
||||
setnb %al |
||||
pop %rbp |
||||
ret |
||||
.endfn tinymath_isgreaterequall,globl |
||||
.alias tinymath_isgreaterequall,isgreaterequall |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_isgreater: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comisd %xmm1,%xmm0 |
||||
seta %al |
||||
.leafepilogue |
||||
.endfn tinymath_isgreater,globl |
||||
.alias tinymath_isgreater,isgreater |
@ -1,36 +0,0 @@
@@ -1,36 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_isgreaterl: |
||||
push %rbp |
||||
mov %rsp,%rbp |
||||
.profilable |
||||
fldt 32(%rbp) |
||||
fldt 16(%rbp) |
||||
xor %eax,%eax |
||||
fcomip %st(1),%st |
||||
fstp %st |
||||
seta %al |
||||
pop %rbp |
||||
ret |
||||
.endfn tinymath_isgreaterl,globl |
||||
.alias tinymath_isgreaterl,isgreaterl |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_isless: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comisd %xmm0,%xmm1 |
||||
seta %al |
||||
.leafepilogue |
||||
.endfn tinymath_isless,globl |
||||
.alias tinymath_isless,isless |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_islessequal: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comisd %xmm0,%xmm1 |
||||
setnb %al |
||||
.leafepilogue |
||||
.endfn tinymath_islessequal,globl |
||||
.alias tinymath_islessequal,islessequal |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_islessequalf: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comiss %xmm0,%xmm1 |
||||
setnb %al |
||||
.leafepilogue |
||||
.endfn tinymath_islessequalf,globl |
||||
.alias tinymath_islessequalf,islessequalf |
@ -1,36 +0,0 @@
@@ -1,36 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_islessequall: |
||||
push %rbp |
||||
mov %rsp,%rbp |
||||
.profilable |
||||
fldt 16(%rbp) |
||||
xor %eax,%eax |
||||
fldt 32(%rbp) |
||||
fcomip %st(1),%st |
||||
fstp %st |
||||
setnb %al |
||||
pop %rbp |
||||
ret |
||||
.endfn tinymath_islessequall,globl |
||||
.alias tinymath_islessequall,islessequall |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||
│ the Free Software Foundation; version 2 of the License. │
|
||||
│ │ |
||||
│ This program is distributed in the hope that it will be useful, but │ |
||||
│ WITHOUT ANY WARRANTY; without even the implied warranty of │
|
||||
│ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU │ |
||||
│ General Public License for more details. │ |
||||
│ │ |
||||
│ You should have received a copy of the GNU General Public License │ |
||||
│ along with this program; if not, write to the Free Software │
|
||||
│ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA │ |
||||
│ 02110-1301 USA │ |
||||
╚─────────────────────────────────────────────────────────────────────────────*/ |
||||
#include "libc/macros.h" |
||||
.source __FILE__
|
||||
|
||||
tinymath_islessf: |
||||
.leafprologue |
||||
.profilable |
||||
xor %eax,%eax |
||||
comiss %xmm0,%xmm1 |
||||
seta %al |
||||
.leafepilogue |
||||
.endfn tinymath_islessf,globl |
||||
.alias tinymath_islessf,islessf |
@ -1,31 +0,0 @@
@@ -1,31 +0,0 @@
|
||||
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
||||
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│ |
||||
╞══════════════════════════════════════════════════════════════════════════════╡ |
||||
│ Copyright 2020 Justine Alexandra Roberts Tunney │ |
||||
│ │ |
||||
│ This program is free software; you can redistribute it and/or modify │
|
||||
│ it under the terms of the GNU General Public License as published by │ |
||||