Return to asir-ja_JP.UTF8.sm1 CVS log

Up to [local] / OpenXM / src / kan96xx / Doc / Resource

Annotation of OpenXM/src/kan96xx/Doc/Resource/asir-ja_JP.UTF8.sm1, Revision 1.2

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