OpenXM/src/kan96xx/Kan/var.sm1 - diff

Return to var.sm1 CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.2, 1999/11/08 09:15:01

version 1.4, 2004/09/16 23:53:44

Line 1

% $OpenXM$

% $OpenXM: OpenXM/src/kan96xx/Kan/var.sm1,v 1.3 2000/01/20 01:34:48 takayama Exp $

%% start of var.sm1. 1997, 2/27

%%(type in initv to initialize the variable stack and type in test.var to start a test) message

Line 214 initv

%%% if you like rigorous naming system execute the following command.

/strictMode {

[(Strict2) 1] system_variable

[(chattrs) 1] extension

[(or_attrs) 1] extension

[(chattr) 0 /arg1] extension

[(chattr) 0 /arg2] extension

[(chattr) 0 /arg3] extension

[(chattr) 0 /v1] extension %% used in join.

[(chattr) 0 /v2] extension

[(chattr) 0 /@.usages] extension

[(chattr) 0 /@@@expand.arg1] extension

[(chattr) 0 /f-expand] extension

[(chattr) 0 /f-ans] extension

[(chattr) 0 /in-expand] extension

@@@.quiet.var { }

{ (var.sm1 : Strict control of the name space is enabled. (cf. extension)) message }

ifelse