1 /* This file is part of the program psim.
3 Copyright (C) 1994-1997, 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 2 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, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25 #include "sim-basics.h"
26 #include "sim-assert.h"
32 LSMASKED (unsigned_word val
,
36 /* NOTE - start, stop can wrap */
37 val
&= LSMASK (start
, stop
);
44 MSMASKED (unsigned_word val
,
48 /* NOTE - start, stop can wrap */
49 val
&= MSMASK (start
, stop
);
56 LSEXTRACTED (unsigned_word val
,
60 ASSERT (start
>= stop
);
61 #if (WITH_TARGET_WORD_BITSIZE == 64)
62 return LSEXTRACTED64 (val
, start
, stop
);
64 #if (WITH_TARGET_WORD_BITSIZE == 32)
70 val
&= LSMASK (start
, 0);
80 MSEXTRACTED (unsigned_word val
,
84 ASSERT (start
<= stop
);
85 #if (WITH_TARGET_WORD_BITSIZE == 64)
86 return MSEXTRACTED64 (val
, start
, stop
);
88 #if (WITH_TARGET_WORD_BITSIZE == 32)
94 val
&= MSMASK (start
, 64 - 1);
95 val
>>= (64 - stop
- 1);
104 LSINSERTED (unsigned_word val
,
108 ASSERT (start
>= stop
);
109 #if (WITH_TARGET_WORD_BITSIZE == 64)
110 return LSINSERTED64 (val
, start
, stop
);
112 #if (WITH_TARGET_WORD_BITSIZE == 32)
113 /* Bit numbers are 63..0, even for 32 bit targets.
114 On 32 bit targets we ignore 63..32 */
120 val
&= LSMASK (start
, stop
);
128 MSINSERTED (unsigned_word val
,
132 ASSERT (start
<= stop
);
133 #if (WITH_TARGET_WORD_BITSIZE == 64)
134 return MSINSERTED64 (val
, start
, stop
);
136 #if (WITH_TARGET_WORD_BITSIZE == 32)
137 /* Bit numbers are 0..63, even for 32 bit targets.
138 On 32 bit targets we ignore 0..31. */
143 val
<<= ((64 - 1) - stop
);
144 val
&= MSMASK (start
, stop
);
154 LSSEXT (signed_word val
,
157 ASSERT (sign_bit
< 64);
158 #if (WITH_TARGET_WORD_BITSIZE == 64)
159 return LSSEXT64 (val
, sign_bit
);
161 #if (WITH_TARGET_WORD_BITSIZE == 32)
165 val
= LSSEXT32 (val
, sign_bit
);
173 MSSEXT (signed_word val
,
176 ASSERT (sign_bit
< 64);
177 #if (WITH_TARGET_WORD_BITSIZE == 64)
178 return MSSEXT64 (val
, sign_bit
);
180 #if (WITH_TARGET_WORD_BITSIZE == 32)
184 val
= MSSEXT32 (val
, sign_bit
- 32);
193 #include "sim-n-bits.h"
197 #include "sim-n-bits.h"
201 #include "sim-n-bits.h"
205 #include "sim-n-bits.h"
208 #endif /* _SIM_BITS_C_ */