VirtualBox

source: vbox/trunk/src/libs/softfloat-3e/testfloat/source/uint128.c@ 107044

Last change on this file since 107044 was 94551, checked in by vboxsync, 3 years ago

libs/softfloat: Copied TestFloat-3e from vendor branch and to testfloat subdir. bugref:9898

  • Property svn:eol-style set to native
File size: 2.9 KB
Line 
1
2/*============================================================================
3
4This C source file is part of TestFloat, Release 3e, a package of programs for
5testing the correctness of floating-point arithmetic complying with the IEEE
6Standard for Floating-Point, by John R. Hauser.
7
8Copyright 2011, 2012, 2013, 2014 The Regents of the University of California.
9All rights reserved.
10
11Redistribution and use in source and binary forms, with or without
12modification, are permitted provided that the following conditions are met:
13
14 1. Redistributions of source code must retain the above copyright notice,
15 this list of conditions, and the following disclaimer.
16
17 2. Redistributions in binary form must reproduce the above copyright notice,
18 this list of conditions, and the following disclaimer in the documentation
19 and/or other materials provided with the distribution.
20
21 3. Neither the name of the University nor the names of its contributors may
22 be used to endorse or promote products derived from this software without
23 specific prior written permission.
24
25THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS "AS IS", AND ANY
26EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
27WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, ARE
28DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY
29DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
30(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
31LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
32ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
33(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
34SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
35
36=============================================================================*/
37
38#include <stdbool.h>
39#include <stdint.h>
40#include "platform.h"
41#include "uint128.h"
42
43struct uint128 shortShiftLeft128( struct uint128 a, int count )
44{
45 struct uint128 z;
46
47 z.v64 = a.v64<<count | a.v0>>(-count & 63);
48 z.v0 = a.v0<<count;
49 return z;
50
51}
52
53struct uint128 shortShiftRight128( struct uint128 a, int count )
54{
55 struct uint128 z;
56
57 z.v64 = a.v64>>count;
58 z.v0 = a.v64<<(-count & 63) | a.v0>>count;
59 return z;
60
61}
62
63struct uint128 shortShiftRightJam128( struct uint128 a, int count )
64{
65 int negCount;
66 struct uint128 z;
67
68 negCount = -count;
69 z.v64 = a.v64>>count;
70 z.v0 =
71 a.v64<<(negCount & 63) | a.v0>>count
72 | ((uint64_t) (a.v0<<(negCount & 63)) != 0);
73 return z;
74
75}
76
77struct uint128 neg128( struct uint128 a )
78{
79
80 if ( a.v0 ) {
81 a.v64 = ~a.v64;
82 a.v0 = -a.v0;
83 } else {
84 a.v64 = -a.v64;
85 }
86 return a;
87
88}
89
90struct uint128 add128( struct uint128 a, struct uint128 b )
91{
92 struct uint128 z;
93
94 z.v0 = a.v0 + b.v0;
95 z.v64 = a.v64 + b.v64 + (z.v0 < a.v0);
96 return z;
97
98}
99
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