VirtualBox

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

Last change on this file since 2919 was 1, checked in by vboxsync, 55 years ago

import

  • Property svn:keywords set to Id
File size: 1.5 KB
Line 
1; $Id: truncl.asm 1 1970-01-01 00:00:00Z vboxsync $
2;; @file
3; InnoTek Portable Runtime - No-CRT truncl - AMD64 & X86.
4;
5
6;
7; Copyright (C) 2006 InnoTek Systemberatung 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; If you received this file as part of a commercial VirtualBox
18; distribution, then only the terms of your commercial VirtualBox
19; license agreement apply instead of the previous paragraph.
20;
21
22
23%include "iprt/asmdefs.mac"
24
25BEGINCODE
26
27%ifdef __AMD64__
28 %define _SP rsp
29 %define _BP rbp
30 %define _S 8
31%else
32 %define _SP esp
33 %define _BP ebp
34 %define _S 4
35%endif
36
37;;
38; Round to truncated integer value.
39; @returns st(0)
40; @param rd [rbp + 8]
41BEGINPROC RT_NOCRT(truncl)
42 push _BP
43 mov _BP, _SP
44 sub _SP, 10h
45
46 fld tword [_BP + _S*2]
47
48 ; Make it truncate up by modifying the fpu control word.
49 fstcw [_BP - 10h]
50 mov eax, [_BP - 10h]
51 or eax, 00c00h
52 mov [_BP - 08h], eax
53 fldcw [_BP - 08h]
54
55 ; Round ST(0) to integer.
56 frndint
57
58 ; Restore the fpu control word.
59 fldcw [_BP - 10h]
60
61 leave
62 ret
63ENDPROC RT_NOCRT(truncl)
64
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