Annotation of OpenXM/src/kan96xx/Doc/Resource/sm1-ja_JP.UTF8.sm1, Revision 1.2
1.2 ! takayama 1: %DO NOT EDIT THIS FILE. Edit sm1-ja_JP.eucJP.sm1
1.1 takayama 2: [
3: [(gateKeeperOfLocalizedString.dic)
4: (LocalizedString.dicの門番)
5: ]
6: %% Try input (1*-2).
7: [
8: [(executeString: ) nl
9: (ERROR(kanExport[0|1].c): parser.c : Syntax error in the input polynomial.)
10: ] cat
11: (エラー(kanExport[0|1].c): parser.c 入力多項式の文法エラー)
12: ]
13: ] /localizedString.dic set
14:
15: /localizedString.mydic
16: [
17: %% No. 0 (executeString: ) nl
18: %% Try input hoge
19: (>>Warning: The identifier .* is not in the system dictionary)
20: %% No. 2
21: %% Try input 1 length
22: (.*Usage:length)
23: ]
24: def
25:
26: /localizedString.local {
27: /arg1 set
28: [/ss /ans /pp /pp2] pushVariables
29: [
30: arg1 /ss set
31: /ans ss def
32: {
33: % No. 0
34: [(regexec) localizedString.mydic 0 get [ss]] extension /pp set
35: pp length 0 gt {
36: [(stringToArgv2) ss ( )] extension /pp2 set
37: /ans [(エラー: ) pp2 4 get ( が定義されていません.)] cat def
38: exit
39: }{ } ifelse
40:
41: % No. 1
42: [(regexec) localizedString.mydic 0 get [ss]] extension /pp set
43: pp length 0 gt {
44: [(stringToArgv2) ss ( )] extension /pp2 set
45: /ans (エラー(sm): length の引数が範囲外です.) def
46: exit
47: }{ } ifelse
48:
49: exit
50: } loop
51: ans /arg1 set
52: ] pop
53: popVariables
54: arg1
55: } def
56:
57:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>