9 lines
182 B
Text
9 lines
182 B
Text
|
#!/usr/bin/newlisp
|
||
|
|
|
||
|
|
(if (catch (regex-comp "ほげほげ" 0x800) 'result)
|
||
|
|
(println ">>>>> UTF-8 compile SUCESSFULL")
|
||
|
|
(println ">>>>> PROBLEM in UTF-8 compile:\n" result))
|
||
|
|
|
||
|
|
(exit)
|
||
|
|
|