Warning: Attempt to read property "date" on null in /usr/local/www/websvn.planix.org/blame.php on line 247

Warning: Attempt to read property "msg" on null in /usr/local/www/websvn.planix.org/blame.php on line 247
WebSVN – tendra.SVN – Blame – /branches/algol60/src/installers/hppa/common/szs_als.h – Rev 2

Subversion Repositories tendra.SVN

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 7u83 1
/*
2
    		 Crown Copyright (c) 1997
3
 
4
    This TenDRA(r) Computer Program is subject to Copyright
5
    owned by the United Kingdom Secretary of State for Defence
6
    acting through the Defence Evaluation and Research Agency
7
    (DERA).  It is made available to Recipients with a
8
    royalty-free licence for its use, reproduction, transfer
9
    to other parties and amendment for any purpose not excluding
10
    product development provided that any such use et cetera
11
    shall be deemed to be acceptance of the following conditions:-
12
 
13
        (1) Its Recipients shall ensure that this Notice is
14
        reproduced upon any copies or amended versions of it;
15
 
16
        (2) Any amended version of it shall be clearly marked to
17
        show both the nature of and the organisation responsible
18
        for the relevant amendment or amendments;
19
 
20
        (3) Its onward transfer from a recipient to another
21
        party shall be deemed to be that party's acceptance of
22
        these conditions;
23
 
24
        (4) DERA gives no warranty or assurance as to its
25
        quality or suitability for any purpose and DERA accepts
26
        no liability whatsoever in relation to any use to which
27
        it may be put.
28
*/
29
 
30
 
31
/*
32
$Log: szs_als.h,v $
33
 * Revision 1.1.1.1  1998/01/17  15:56:03  release
34
 * First version to be checked into rolling release.
35
 *
36
 * Revision 1.3  1996/10/24  15:51:22  wfs
37
 * Added "~alloc_size" special token. Minor change to alloca_tag - only need
38
 * one word for storage of pointer. Major change to round_tag (rounding to
39
 * unsigned chars) in the fix of avs bug.
40
 *
41
 * Revision 1.2  1995/12/18  13:12:38  wfs
42
 * Put hppatrans uder cvs control. Major Changes made since last release
43
 * include:
44
 * (i) PIC code generation.
45
 * (ii) Profiling.
46
 * (iii) Dynamic Initialization.
47
 * (iv) Debugging of Exception Handling and Diagnostics.
48
 *
49
 * Revision 5.0  1995/08/25  13:42:58  wfs
50
 * Preperation for August 25 Glue release
51
 *
52
 * Revision 3.4  1995/08/25  11:12:16  wfs
53
 * *** empty log message ***
54
 *
55
 * Revision 3.4  1995/08/25  11:12:16  wfs
56
 * *** empty log message ***
57
 *
58
 * Revision 3.1  95/04/10  16:28:16  16:28:16  wfs (William Simmonds)
59
 * Apr95 tape version.
60
 * 
61
 * Revision 3.0  95/03/30  11:19:04  11:19:04  wfs (William Simmonds)
62
 * Mar95 tape version with CRCR95_178 bug fix.
63
 * 
64
 * Revision 2.0  95/03/15  15:28:58  15:28:58  wfs (William Simmonds)
65
 * spec 3.1 changes implemented, tests outstanding.
66
 * 
67
 * Revision 1.1  95/01/11  13:44:36  13:44:36  wfs (William Simmonds)
68
 * Initial revision
69
 * 
70
*/
71
 
72
 
73
#ifndef SZS_ALS_INCLUDED
74
#define SZS_ALS_INCLUDED
75
 
76
 
77
/*
78
    BASIC SIZES AND ALIGNMENTS
79
*/
80
 
81
#define TOP_SZ			( ( long ) 0 )
82
#define TOP_ALIGN		const_al1
83
 
84
#define PROC_SZ			( ( long ) 32 )
85
#define PROC_ALIGN		const_al32
86
 
87
#define LLVALUE_SZ		( ( long ) 32 )
88
#define LLVALUE_ALIGN		const_al32
89
 
90
#define PTR_SZ			( ( long ) 32 )
91
#define PTR_ALIGN		const_al32
92
#define PTRBIT_SZ		( ( long ) 32 )
93
 
94
#define OFFSET_SZ		( ( long ) 32 )
95
#define OFFSET_ALIGN		const_al32
96
 
97
#define BF_ALIGN		const_al1
98
#define STRUCT_ALIGN		const_al8
99
 
100
#define SHREAL_SZ		( ( long ) 32 )
101
#define SHREAL_ALIGN		const_al32
102
 
103
#define REAL_SZ			( ( long ) 64 )
104
#define REAL_ALIGN		const_al64
105
 
106
 
107
#if use_long_double
108
 
109
#define DOUBLE_SZ		( ( long ) 128 )
110
#define DOUBLE_ALIGN		const_al64
111
 
112
#else
113
 
114
#define DOUBLE_SZ		REAL_SZ
115
#define DOUBLE_ALIGN		REAL_ALIGN
116
 
117
#endif
118
 
119
 
120
#define UCHAR_SZ		( ( long ) 8 )
121
#define UCHAR_ALIGN		const_al8
122
 
123
#define SCHAR_SZ		( ( long ) 8 )
124
#define SCHAR_ALIGN		const_al8
125
 
126
#define UWORD_SZ		( ( long ) 16 )
127
#define UWORD_ALIGN		const_al16
128
 
129
#define SWORD_SZ		( ( long ) 16 )
130
#define SWORD_ALIGN		const_al16
131
 
132
#define ULONG_SZ		( ( long ) 32 )
133
#define ULONG_ALIGN		const_al32
134
 
135
#define SLONG_SZ		( ( long ) 32 )
136
#define SLONG_ALIGN		const_al32
137
 
138
#define U64_ALIGN const_al32
139
#define U64_SZ (long)64
140
 
141
#define S64_ALIGN const_al32
142
#define S64_SZ (long)64
143
 
144
#define BF_STORE_UNIT		( ( long ) 32 )
145
#define MAX_BF_SIZE		const_al32
146
 
147
#define ALLOCA_ALIGN		const_al64
148
#define FRAME_ALIGN		const_al32
149
#define VAR_PARAM_ALIGN		const_al32
150
#define CODE_ALIGN		const_al32
151
#define MIN_PAR_ALIGNMENT       const_al32
152
 
153
/*
154
    FLOATING POINT MANTISSA SIZES
155
*/
156
 
157
#define FLOAT_BITS		24
158
#define DOUBLE_BITS		53
159
 
160
#if use_long_double
161
#define LDOUBLE_BITS               113
162
#else
163
# define LDOUBLE_BITS		64
164
#endif
165
 
166
#endif /* SZS_ALS_INCLUDED */
167
 
168
 
169
 
170
 
171
 
172