Having labels that are
local to a macro definition is sometimes not quite powerful enough: sometimes you want to
be able to share labels between several macro calls. An example might be a REPEAT
… UNTIL
loop, in which the
expansion of the REPEAT
macro would need to be able to refer
to a label which the UNTIL
macro had defined. However, for
such a macro you would also want to be able to nest these loops.
The NASM preprocessor provides this level of power by means of a context stack. The preprocessor maintains a stack of
contexts, each of which is characterised by a
name. You add a new context to the stack using the %push
directive, and
remove one using %pop
. You can define labels that are local
to a particular context on the stack.
The %push
directive is
used to create a new context and place it on the top of the context stack. %push
requires one argument, which is the name of the context. For
example:
%push foobar
This pushes a new context called foobar
on the stack. You
can have several contexts on the stack with the same name: they can still be
distinguished.
The directive %pop
,
requiring no arguments, removes the top context from the context stack and destroys it,
along with any labels associated with it.
Just as the usage
%%foo
defines a label which is local to the particular macro
call in which it is used, the usage %$foo
is used to define
a label which is local to the context on the top of the context stack. So the
REPEAT
and UNTIL
example given
above could be implemented by means of:
%macro repeat 0 %push repeat %$begin: %endmacro %macro until 1 j%-1 %$begin %pop %endmacro
and invoked by means of, for example,
mov cx,string repeat add cx,3 scasb until e
which would scan every fourth byte of a string in search of the byte in AL
.
If you need to define,
or access, labels local to the context below the
top one on the stack, you can use %$$foo
, or %$$$foo
for the context below that, and so on.
The NASM preprocessor also allows you to define single-line macros which are local to a particular context, in just the same way:
%define %$localmac 3
will define the single-line macro %$localmac
to be local
to the top context on the stack. Of course, after a subsequent %push
, it can then still be accessed by the name %$$localmac
.
If you need to change
the name of the top context on the stack (in order, for example, to have it respond
differently to %ifctx
), you can execute a %pop
followed by a %push
; but this will
have the side effect of destroying all context-local labels and macros associated with
the context that was just popped.
The NASM preprocessor provides the directive %repl
, which replaces a context with a different name, without touching the
associated macros and labels. So you could replace the destructive code
%pop %push newname
with the non-destructive version %repl newname
.
This example makes use of almost all the
context-stack features, including the conditional-assembly construct %ifctx
, to implement
a block IF statement as a set of macros.
%macro if 1 %push if j%-1 %$ifnot %endmacro %macro else 0 %ifctx if %repl else jmp %$ifend %$ifnot: %else %error "expected `if' before `else'" %endif %endmacro %macro endif 0 %ifctx if %$ifnot: %pop %elifctx else %$ifend: %pop %else %error "expected `if' or `else' before `endif'" %endif %endmacro
This code is more robust than the REPEAT
and UNTIL
macros given in Section 4.7.2, because it uses conditional assembly
to check that the macros are issued in the right order (for example, not calling
endif
before if
) and issues a
%error
if they’re not.
In addition, the endif
macro has to be able to cope with
the two distinct cases of either directly following an if
,
or following an else
. It achieves this, again, by using
conditional assembly to do different things depending on whether the context on top of
the stack is if
or else
.
The else
macro has to preserve the context on the stack,
in order to have the %$ifnot
referred to by the if
macro be the same as the one defined by the endif
macro, but has to change the context’s name so that endif
will know there was an intervening else
. It does this by the use of %repl
.
A sample usage of these macros might look like:
cmp ax,bx if ae cmp bx,cx if ae mov ax,cx else mov ax,bx endif else cmp ax,cx if ae mov ax,cx endif endif
The block-IF
macros handle nesting quite happily, by
means of pushing another context, describing the inner if
,
on top of the one describing the outer if
; thus else
and endif
always refer to the last
unmatched if
or else
.