mirror of
https://github.com/PDP-10/its.git
synced 2026-01-21 10:13:35 +00:00
23 lines
443 B
Plaintext
23 lines
443 B
Plaintext
'<PCODE "HASH">
|
|
|
|
<PACKAGE "FMACRO">
|
|
|
|
<ENTRY FAST-MACROS>
|
|
|
|
<USE "HASH">
|
|
|
|
<NEWTYPE NORMAL-MACRO LIST>
|
|
|
|
<COND (<NOT <APPLYTYPE NORMAL-MACRO>> <APPLYTYPE NORMAL-MACRO MACRO> <SETG
|
|
FAST-MACRO (T)>)>
|
|
|
|
<GDECL (FAST-MACRO) LIST>
|
|
|
|
<SETG FAST-MACROS %<RSUBR-ENTRY '[HASH FAST-MACROS #DECL ("VALUE" STRING
|
|
"OPTIONAL" ANY)] 385>>
|
|
|
|
<SETG FAST-MACROER %<RSUBR-ENTRY '[HASH FAST-MACROER #DECL ("VALUE" ANY MACRO
|
|
"ARGS" LIST)] 436>>
|
|
|
|
<ENDPACKAGE>
|