| version 1.48, 2006/02/02 04:16:49 |
version 1.50, 2006/02/02 07:07:22 |
|
|
| %%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.47 2006/02/01 03:37:44 takayama Exp $ |
%%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.49 2006/02/02 05:15:45 takayama Exp $ |
| |
|
| /ox.sm1.myname (ox-new.sm1) def |
/ox.sm1.myname (ox-new.sm1) def |
| |
|
| Line 1879 oxasir.verbose { |
|
| Line 1879 oxasir.verbose { |
|
| tt isArray { |
tt isArray { |
| tt length 0 gt { |
tt length 0 gt { |
| ans |
ans |
| [(gotoLine, ) tt 0 get toString lf nl] join /ans set |
[(gotoLine, ) tt 0 get toString nl lf] join /ans set |
| }{ } ifelse |
}{ } ifelse |
| } { } ifelse |
} { } ifelse |
| tt isInteger { |
tt isInteger { |
| [(gotoLine, ) tt toString lf nl] join /ans set |
[(gotoLine, ) tt toString nl lf] join /ans set |
| } { } ifelse |
} { } ifelse |
| |
|
| ee (where) getNode /tt set |
ee (where) getNode /tt set |
| tt isArray { |
tt isArray { |
| tt length 0 gt { |
tt length 0 gt { |
| ans |
ans |
| [(findAndSelect, ) tt 0 get (string) dc lf nl] join /ans set |
[(findAndSelect, ) tt 0 get (string) dc nl lf] join /ans set |
| }{ } ifelse |
}{ } ifelse |
| } { } ifelse |
} { } ifelse |
| |
|
| Line 1899 oxasir.verbose { |
|
| Line 1899 oxasir.verbose { |
|
| ee (reason_of_parse_error) getNode /tt set |
ee (reason_of_parse_error) getNode /tt set |
| } { } ifelse |
} { } ifelse |
| tt tag 0 eq not { |
tt tag 0 eq not { |
| ans [(printErrorMessage, ) tt (string) dc lf nl] join /ans set |
ans [(printErrorMessage, ) tt (string) dc nl lf] join /ans set |
| %% translation and encoding is necessary. |
%% translation and encoding is necessary. |
| }{ } ifelse |
}{ } ifelse |
| |
|
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to ox.sm1 CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / Doc