diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-13 14:05:13 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-14 02:27:27 +0300 |
commit | ce29f168ed52f08228b99a789785271a4a3c9b0e (patch) | |
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')
-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 --- /dev/null +++ b/src/ellinika/tests/escape.scm | |||
@@ -0,0 +1,6 @@ | |||
1 | (load-extension "./libelmorph" "scm_init_ellinika_elmorph_module") | ||
2 | |||
3 | (display (utf8-escape "ο \"παρα\\κείμενος\"")) | ||
4 | (newline) | ||
5 | (display (utf8-escape "ο \"παρα\\κείμενος\"" "ία" )) | ||
6 | (newline) | ||