[BACK]Return to asir-ja_JP.eucJP.sm1 CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Doc / Resource

Annotation of OpenXM/src/kan96xx/Doc/Resource/asir-ja_JP.eucJP.sm1, Revision 1.3

1.1       takayama    1: % localizedString for asir.  ja_JP.eucJP.
                      2: [
1.3     ! takayama    3:  [(getarray : array or list expected),    %% X=1; X[0];
        !             4:   [(このオブジェクトはリストでもベクトルでも行列 [配列] でもないため, 要素をとりだせません. )
        !             5:   ] cat
        !             6:  ]
1.1       takayama    7:  [(parse error),
                      8:   [(文法エラーです. キャレットの位置の周辺を見直してください.) nl
                      9:    ({ } ボタンでエラーがみつかることもあります.)
                     10:   ] cat
                     11:  ]
                     12:  [(eval : invalid assignment),
1.2       takayama   13:   [(この代入はできません.) nl
1.1       takayama   14:    (原因例: X=1 はできるが x=1 はできない.  大文字ではじまる英数字の列が変数です.) ] cat
                     15:   ]
                     16:  [(segmentation fault),
1.2       takayama   17:   [(segmentation fault です.) nl
1.1       takayama   18:    (原因例: 関数の引数の誤りなど.) ] cat
                     19:  ]
                     20: ] /localizedString.dic set
                     21:
1.2       takayama   22: /localizedString.mydic
                     23:  [
                     24:    %% No. 0
                     25:    %% Try input  length(1);
                     26:    (.*: invalid argument)
                     27:    %% No. 1
                     28:    %% Try input  length();
                     29:    (evalf : argument mismatch .*)
                     30:  ]
                     31: def
1.1       takayama   32:
                     33: /localizedString.local {
                     34:   /arg1 set
                     35:   [/ss /ans /pp /pp2] pushVariables
                     36:   [
                     37:     arg1 /ss set
                     38:     /ans ss def
                     39:     {
                     40:       % Example: (evalf : hoge undefined)
                     41:       [(regexec) (evalf : .* undefined) [ss]] extension /pp set
                     42:       pp length 0 gt {
                     43:         [(stringToArgv2) ss ( )] extension /pp2 set
1.2       takayama   44:         /ans [ pp2 2 get ( が定義されていません.)] cat def
                     45:         exit
                     46:       }{ } ifelse
                     47:
                     48:       % No. 0
                     49:       [(regexec) localizedString.mydic 0 get [ss]] extension /pp set
                     50:       pp length 0 gt {
                     51:         [(stringToArgv2) ss ( )] extension /pp2 set
                     52:         /ans [pp2 0 get ( に対してこのデータ型の引数はつかえません.) nl
                     53:               (原因例: リストが引数であるべきだがそれが整数である.)
                     54:              ] cat def
                     55:         exit
                     56:       }{ } ifelse
                     57:
                     58:       % No. 1
                     59:       [(regexec) localizedString.mydic 1 get [ss]] extension /pp set
                     60:       pp length 0 gt {
                     61:         [(stringToArgv2) ss ( )] extension /pp2 set
                     62:         /ans [pp2 5 get ( : 引数の数が違います. )] cat def
1.1       takayama   63:         exit
                     64:       }{ } ifelse
                     65:
                     66:       exit
                     67:     } loop
                     68:     ans /arg1 set
                     69:   ] pop
                     70:   popVariables
                     71:   arg1
                     72: } def
                     73:
                     74:
                     75: %% error packet の reason_of_error が無ければ 2th argument を見る.

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>