author | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-13 11:05:13 (GMT) |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-13 23:27:27 (GMT) |
commit | ce29f168ed52f08228b99a789785271a4a3c9b0e (patch) (side-by-side diff) | |
tree | acdcf09cc887bc508d8d803ad971f96e9da442be /src/ellinika/tests/escape.scm | |
parent | bee3becef44e298f59d72cee3c8e552bccb10d65 (diff) | |
download | ellinika-ce29f168ed52f08228b99a789785271a4a3c9b0e.tar.gz ellinika-ce29f168ed52f08228b99a789785271a4a3c9b0e.tar.bz2 |
Implement escape function.
Diffstat (limited to 'src/ellinika/tests/escape.scm') (more/less context) (ignore whitespace changes)
-rw-r--r-- | src/ellinika/tests/escape.scm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/ellinika/tests/escape.scm b/src/ellinika/tests/escape.scm new file mode 100644 index 0000000..841e496 --- a/dev/null +++ b/src/ellinika/tests/escape.scm @@ -0,0 +1,6 @@ +(load-extension "./libelmorph" "scm_init_ellinika_elmorph_module") + +(display (utf8-escape "ο \"παρα\\κείμενος\"")) +(newline) +(display (utf8-escape "ο \"παρα\\κείμενος\"" "ία" )) +(newline) |