VirtualBox

source: vbox/trunk/src/VBox/Runtime/common/math/truncl.asm@ 5606

Last change on this file since 5606 was 4071, checked in by vboxsync, 17 years ago

Biggest check-in ever. New source code headers for all (C) innotek files.

  • Property svn:keywords set to Id
File size: 1.3 KB
Line 
1; $Id: truncl.asm 4071 2007-08-07 17:07:59Z vboxsync $
2;; @file
3; innotek Portable Runtime - No-CRT truncl - AMD64 & X86.
4;
5
6;
7; Copyright (C) 2006-2007 innotek GmbH
8;
9; This file is part of VirtualBox Open Source Edition (OSE), as
10; available from http://www.virtualbox.org. This file is free software;
11; you can redistribute it and/or modify it under the terms of the GNU
12; General Public License as published by the Free Software Foundation,
13; in version 2 as it comes in the "COPYING" file of the VirtualBox OSE
14; distribution. VirtualBox OSE is distributed in the hope that it will
15; be useful, but WITHOUT ANY WARRANTY of any kind.
16
17
18%include "iprt/asmdefs.mac"
19
20BEGINCODE
21
22%ifdef RT_ARCH_AMD64
23 %define _SP rsp
24 %define _BP rbp
25 %define _S 8
26%else
27 %define _SP esp
28 %define _BP ebp
29 %define _S 4
30%endif
31
32;;
33; Round to truncated integer value.
34; @returns st(0)
35; @param rd [rbp + 8]
36BEGINPROC RT_NOCRT(truncl)
37 push _BP
38 mov _BP, _SP
39 sub _SP, 10h
40
41 fld tword [_BP + _S*2]
42
43 ; Make it truncate up by modifying the fpu control word.
44 fstcw [_BP - 10h]
45 mov eax, [_BP - 10h]
46 or eax, 00c00h
47 mov [_BP - 08h], eax
48 fldcw [_BP - 08h]
49
50 ; Round ST(0) to integer.
51 frndint
52
53 ; Restore the fpu control word.
54 fldcw [_BP - 10h]
55
56 leave
57 ret
58ENDPROC RT_NOCRT(truncl)
59
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette