preproc.c: completed deprecation of MMacro structure
[nasm.git] / standard.mac
blob727de87f2603a7f2598dfde230cf1cc89f1c5e3a
1 ;; --------------------------------------------------------------------------
2 ;;   
3 ;;   Copyright 1996-2009 The NASM Authors - All Rights Reserved
4 ;;   See the file AUTHORS included with the NASM distribution for
5 ;;   the specific copyright holders.
6 ;;
7 ;;   Redistribution and use in source and binary forms, with or without
8 ;;   modification, are permitted provided that the following
9 ;;   conditions are met:
11 ;;   * Redistributions of source code must retain the above copyright
12 ;;     notice, this list of conditions and the following disclaimer.
13 ;;   * Redistributions in binary form must reproduce the above
14 ;;     copyright notice, this list of conditions and the following
15 ;;     disclaimer in the documentation and/or other materials provided
16 ;;     with the distribution.
17 ;;     
18 ;;     THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
19 ;;     CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
20 ;;     INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
21 ;;     MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
22 ;;     DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
23 ;;     CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24 ;;     SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 ;;     NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
26 ;;     LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 ;;     HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 ;;     CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
29 ;;     OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
30 ;;     EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 ;; --------------------------------------------------------------------------
34 ; Standard macro set for NASM -*- nasm -*-
36 ; Macros to make NASM ignore some TASM directives before the first include
37 ; directive.
39     %idefine IDEAL
40     %idefine JUMPS
41     %idefine P386
42     %idefine P486
43     %idefine P586
44     %idefine END
46 ; This is a magic token which indicates the end of the TASM macros
47 *END*TASM*MACROS*
49 ; Note that although some user-level forms of directives are defined
50 ; here, not all of them are: the user-level form of a format-specific
51 ; directive should be defined in the module for that directive.
53 ; These three need to be defined, though the actual definitions will
54 ; be constantly updated during preprocessing.
55 %define __FILE__
56 %define __LINE__
57 %define __BITS__
59 %define __SECT__                ; it ought to be defined, even if as nothing
61 %imacro section 1+.nolist
62 %define __SECT__ [section %1]
63           __SECT__
64 %endmacro
65 %imacro segment 1+.nolist
66 %define __SECT__ [segment %1]
67           __SECT__
68 %endmacro
69 %imacro sectalign 1.nolist
70         [sectalign %1]
71 %endmacro
73 %imacro absolute 1+.nolist
74 %define __SECT__ [absolute %1]
75           __SECT__
76 %endmacro
78 %imacro struc 1-2.nolist 0
79 %push
80 %define %$strucname %1
81 [absolute %2]
82 %$strucname:                    ; allow definition of `.member' to work sanely
83 %endmacro
84 %imacro endstruc 0.nolist
85 %{$strucname}_size equ ($-%$strucname)
86 %pop
87 __SECT__
88 %endmacro
90 %imacro istruc 1.nolist
91 %push
92 %define %$strucname %1
93 %$strucstart:
94 %endmacro
95 %imacro at 1-2+.nolist
96           times (%1-%$strucname)-($-%$strucstart) db 0
97           %2
98 %endmacro
99 %imacro iend 0.nolist
100           times %{$strucname}_size-($-%$strucstart) db 0
101 %pop
102 %endmacro
104 %imacro align 1-2+.nolist nop
105           sectalign %1
106           times (((%1) - (($-$$) % (%1))) % (%1)) %2
107 %endmacro
108 %imacro alignb 1-2+.nolist
109           sectalign %1
110           %ifempty %2
111                 resb (((%1) - (($-$$) % (%1))) % (%1))
112           %else
113                 times (((%1) - (($-$$) % (%1))) % (%1)) %2
114           %endif
115 %endmacro
117 %imacro extern 1-*.nolist
118 %rep %0
119 [extern %1]
120 %rotate 1
121 %endrep
122 %endmacro
124 %imacro bits 1+.nolist
125 [bits %1]
126 %endmacro
128 %imacro use16 0.nolist
129 [bits 16]
130 %endmacro
131 %imacro use32 0.nolist
132 [bits 32]
133 %endmacro
134 %imacro use64 0.nolist
135 [bits 64]
136 %endmacro
138 %imacro global 1-*.nolist
139 %rep %0
140 [global %1]
141 %rotate 1
142 %endrep
143 %endmacro
145 %imacro common 1-*.nolist
146 %rep %0
147 [common %1]
148 %rotate 1
149 %endrep
150 %endmacro
152 %imacro cpu 1+.nolist
153 [cpu %1]
154 %endmacro
156 %define __FLOAT_DAZ__ nodaz
157 %define __FLOAT_ROUND__ near
158 ; __FLOAT__ contains the whole floating-point configuration so it can
159 ; be saved and restored
160 %define __FLOAT__ __FLOAT_DAZ__,__FLOAT_ROUND__
161 %imacro float 1-*.nolist
162 %rep %0
163 [float %1]
164 %ifidni %1,daz
165 %define __FLOAT_DAZ__ daz
166 %elifidni %1,nodaz
167 %define __FLOAT_DAZ__ nodaz
168 %elifidni %1,near
169 %define __FLOAT_ROUND__ near
170 %elifidni %1,up
171 %define __FLOAT_ROUND__ up
172 %elifidni %1,down
173 %define __FLOAT_ROUND__ down
174 %elifidni %1,zero
175 %define __FLOAT_ROUND__ zero
176 %elifidni %1,default
177 %define __FLOAT_DAZ__ nodaz
178 %define __FLOAT_ROUND__ near
179 %endif
180 %rotate 1
181 %endrep
182 %endmacro
184 %imacro default 1+.nolist
185 [default %1]
186 %endmacro
188 %imacro incbin 1-2+.nolist 0
189 %push
190 %pathsearch %$dep %1
191 %depend %$dep
192         %? %$dep,%2
193 %pop
194 %endmacro