[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.2

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

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