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