1 /* This file is part of the program psim.
3 Copyright (C) 1994-1996, Andrew Cagney <cagney@highland.com.au>
4 Copyright (C) 1997, Free Software Foundation, Inc.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24 #error "N must be #defined"
30 /* If signed were defined to be say __signed (ie, some versions of Linux),
31 then the signedN macro would not work correctly. If we have a standard
32 compiler, we have signed. */
36 /* NOTE: See end of file for #undef */
37 #define unsignedN XCONCAT2(unsigned,N)
38 #define signedN XCONCAT2(signed,N)
39 #define MASKEDn XCONCAT2(MASKED,N)
40 #define MASKn XCONCAT2(MASK,N)
41 #define LSMASKEDn XCONCAT2(LSMASKED,N)
42 #define LSMASKn XCONCAT2(LSMASK,N)
43 #define MSMASKEDn XCONCAT2(MSMASKED,N)
44 #define MSMASKn XCONCAT2(MSMASK,N)
45 #define EXTRACTEDn XCONCAT2(EXTRACTED,N)
46 #define INSERTEDn XCONCAT2(INSERTED,N)
47 #define ROTn XCONCAT2(ROT,N)
48 #define ROTLn XCONCAT2(ROTL,N)
49 #define ROTRn XCONCAT2(ROTR,N)
50 #define SEXTn XCONCAT2(SEXT,N)
55 MASKEDn (unsignedN word
,
59 return (word
& MASKn (start
, stop
));
65 LSMASKEDn (unsignedN word
,
68 return (word
& LSMASKn (nr_bits
));
74 MSMASKEDn (unsignedN word
,
77 return (word
& MSMASKn (nr_bits
));
83 EXTRACTEDn (unsignedN val
,
87 val
<<= _MSB_SHIFT (N
, start
);
88 val
>>= (_MSB_SHIFT (N
, start
) + _LSB_SHIFT (N
, stop
));
95 INSERTEDn (unsignedN val
,
99 val
&= LSMASKn (_MAKE_WIDTH (start
, stop
));
100 val
<<= _LSB_SHIFT (N
, stop
);
111 return ROTRn (val
, shift
);
113 return ROTLn (val
, -shift
);
121 ROTLn (unsignedN val
,
126 result
= (((val
) << (shift
)) | ((val
) >> ((N
)-(shift
))));
133 ROTRn (unsignedN val
,
138 result
= (((val
) >> (shift
)) | ((val
) << ((N
)-(shift
))));
148 /* make the sign-bit most significant and then smear it back into
150 ASSERT (sign_bit
< N
);
151 val
<<= _MSB_SHIFT (N
, sign_bit
);
152 val
>>= _MSB_SHIFT (N
, sign_bit
);
157 /* NOTE: See start of file for #define */
This page took 0.324668 seconds and 5 git commands to generate.