version 1.3, 2004/05/13 05:33:10 |
version 1.4, 2004/09/04 11:25:58 |
|
|
%% $OpenXM: OpenXM/src/kan96xx/Kan/smacro.sm1,v 1.2 2000/01/16 07:55:41 takayama Exp $ |
%% $OpenXM: OpenXM/src/kan96xx/Kan/smacro.sm1,v 1.3 2004/05/13 05:33:10 takayama Exp $ |
%%%%%% global control variables |
%%%%%% global control variables |
%% /@@@.quiet 0 def It is defined in scanner(). |
%% /@@@.quiet 0 def It is defined in scanner(). |
/@@@.Dsymbol (D) def |
/@@@.Dsymbol (D) def |
|
|
[$PrintDollar$ 0] system_variable pop |
[$PrintDollar$ 0] system_variable pop |
@@@.quiet 0 eq |
@@@.quiet 0 eq |
{$sm1>$ print} { } ifelse |
{$sm1>$ print} { } ifelse |
|
[(traceClearStack)] extension pop |
] system_variable pop |
] system_variable pop |
} def |
} def |
|
|