19 lines
285 B
Plaintext
19 lines
285 B
Plaintext
|
#define SZWORD EM_WSIZE
|
||
|
#define SZADDR EM_PSIZE
|
||
|
|
||
|
#if SZWORD==SZADDR
|
||
|
#define LOAD lol
|
||
|
#define STORE stl
|
||
|
#else
|
||
|
#define LOAD ldl
|
||
|
#define STORE sdl
|
||
|
#endif
|
||
|
|
||
|
mes 2,SZWORD,SZADDR
|
||
|
|
||
|
exp $GETADDRE
|
||
|
pro $GETADDRE,0
|
||
|
LOAD 0 ; load param (adress of variable)
|
||
|
ret SZADDR ; return address
|
||
|
end 0
|