1 /* This file is part of the program psim.
3 Copyright (C) 1994-1995, Andrew Cagney <cagney@highland.com.au>
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, see <http://www.gnu.org/licenses/>.
28 LSMASKED64 (unsigned64 word
,
32 word
&= LSMASK64 (start
, stop
);
38 LSEXTRACTED64 (unsigned64 val
,
42 val
<<= (64 - 1 - start
); /* drop high bits */
43 val
>>= (64 - 1 - start
) + (stop
); /* drop low bits */
49 MASKED32(unsigned32 word
,
53 return (word
& MASK32(start
, stop
));
58 MASKED64(unsigned64 word
,
62 return (word
& MASK64(start
, stop
));
67 MASKED(unsigned_word word
,
71 return ((word
) & MASK(start
, stop
));
78 EXTRACTED(unsigned_word word
,
82 ASSERT(start
<= stop
);
83 #if (WITH_TARGET_WORD_BITSIZE == 64)
84 return _EXTRACTEDn(64, word
, start
, stop
);
89 return ((word
>> (63 - stop
))
90 & MASK(start
+(63-stop
), 63));
97 INSERTED(unsigned_word word
,
101 ASSERT(start
<= stop
);
102 #if (WITH_TARGET_WORD_BITSIZE == 64)
103 return _INSERTEDn(64, word
, start
, stop
);
108 return ((word
& MASK(start
+(63-stop
), 63))
116 ROTL32(unsigned32 val
,
119 ASSERT(shift
>= 0 && shift
<= 32);
120 return _ROTLn(32, val
, shift
);
126 ROTL64(unsigned64 val
,
129 ASSERT(shift
>= 0 && shift
<= 64);
130 return _ROTLn(64, val
, shift
);
133 #endif /* _BITS_C_ */
This page took 0.032192 seconds and 4 git commands to generate.