From 8c1de36d1f8b27fb946dac15e725c93ec57c1538 Mon Sep 17 00:00:00 2001 From: Sergey Poznyakoff Date: Tue, 14 Jun 2011 14:20:39 +0300 Subject: Improve SQL interface. * src/ellinika/sql.scm (ellinika:sql-verbose) (ellinika:sql-dry-run,ellinika:sql-conn): New public vars. (ellinika:format-sql-query): New function. (ellinika:sql-query): Rewrite. * scm/verbop.scm: Use (ellinika sql). * src/ellinika/conjugator.scm: Likewise. * src/ellinika/test-conjugation.scm: Likewise. * data/irregular-verbs.xml: Update. * src/ellinika/tests/conj/apomenv.scm: New file. --- src/ellinika/tests/conj/apomenv.scm | 4 ++++ src/ellinika/tests/conj/blepv.scm | 1 + 2 files changed, 5 insertions(+) create mode 100644 src/ellinika/tests/conj/apomenv.scm (limited to 'src/ellinika/tests/conj') diff --git a/src/ellinika/tests/conj/apomenv.scm b/src/ellinika/tests/conj/apomenv.scm new file mode 100644 index 0000000..850609c --- /dev/null +++ b/src/ellinika/tests/conj/apomenv.scm @@ -0,0 +1,4 @@ +(use-modules ((ellinika test-conjugation))) + +(test-conjugation:verb "απομένω") +;(test-conjugation:tense "βλέπω" "pas" "sub" "Αόριστος") diff --git a/src/ellinika/tests/conj/blepv.scm b/src/ellinika/tests/conj/blepv.scm index e7fbc8b..7e54734 100644 --- a/src/ellinika/tests/conj/blepv.scm +++ b/src/ellinika/tests/conj/blepv.scm @@ -1,3 +1,4 @@ (use-modules ((ellinika test-conjugation))) (test-conjugation:verb "βλέπω") +;(test-conjugation:tense "βλέπω" "pas" "sub" "Αόριστος") -- cgit v1.2.1