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"
27 /* NOTE: See end of file for #undef */
28 #define unsignedN XCONCAT2(unsigned,N)
29 #define signedN XCONCAT2(signed,N)
30 #define MASKEDn XCONCAT2(MASKED,N)
31 #define MASKn XCONCAT2(MASK,N)
32 #define LSMASKEDn XCONCAT2(LSMASKED,N)
33 #define EXTRACTEDn XCONCAT2(EXTRACTED,N)
34 #define INSERTEDn XCONCAT2(INSERTED,N)
35 #define ROTn XCONCAT2(ROT,N)
36 #define ROTLn XCONCAT2(ROTL,N)
37 #define ROTRn XCONCAT2(ROTR,N)
38 #define SEXTn XCONCAT2(SEXT,N)
43 MASKEDn(unsignedN word,
47 return (word & MASKn(start, stop));
53 LSMASKEDn(unsignedN word,
56 return (word & MASKn(N - nr_bits, N - 1));
62 EXTRACTEDn(unsignedN val,
66 return LSMASKEDn((((unsignedN)(val)) >> (N - stop - 1)),
73 INSERTEDn(unsignedN val,
77 return (((unsignedN)(val)
78 << _MAKE_SHIFT(N, stop))
79 & MASKn(start, stop));
90 return ROTRn(val, shift);
92 return ROTLn(val, -shift);
105 result = (((val) << (shift)) | ((val) >> ((N)-(shift))));
117 result = (((val) >> (shift)) | ((val) << ((N)-(shift))));
127 /* make the sign-bit most significant and then smear it back into
129 ASSERT(sign_bit < N);
130 return (val << sign_bit) >> sign_bit;
134 /* NOTE: See start of file for #define */