You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
39 lines
896 B
39 lines
896 B
/* This is file FLOOR.S */
|
|
/*
|
|
** Copyright (C) 1991 DJ Delorie, 24 Kirsten Ave, Rochester NH 03867-2954
|
|
**
|
|
** This file is distributed under the terms listed in the document
|
|
** "copying.dj", available from DJ Delorie at the address above.
|
|
** A copy of "copying.dj" should accompany this file; if not, a copy
|
|
** should be available from where this file was obtained. This file
|
|
** may not be distributed without a verbatim copy of "copying.dj".
|
|
**
|
|
** This file is distributed WITHOUT ANY WARRANTY; without even the implied
|
|
** warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
*/
|
|
|
|
.text
|
|
.align 2
|
|
.globl _floor
|
|
_floor:
|
|
pushl %ebp
|
|
movl %esp,%ebp
|
|
sub $8,%esp /* -4 = old CW, -2 = new CW */
|
|
|
|
fstcw -4(%ebp)
|
|
fwait
|
|
movw -4(%ebp),%ax
|
|
andw $0xf3ff,%ax
|
|
orw $0x0400,%ax
|
|
movw %ax,-2(%ebp)
|
|
fldcww -2(%ebp)
|
|
|
|
fldl 8(%ebp)
|
|
frndint
|
|
|
|
fldcww -4(%ebp)
|
|
|
|
movl %ebp,%esp
|
|
popl %ebp
|
|
ret
|