diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-14 14:20:39 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-14 14:20:39 +0300 |
commit | 8c1de36d1f8b27fb946dac15e725c93ec57c1538 (patch) | |
tree | 17babe745cf794a7485fc2bc0b9c9e0c9120d893 /data | |
parent | ce29f168ed52f08228b99a789785271a4a3c9b0e (diff) | |
download | ellinika-8c1de36d1f8b27fb946dac15e725c93ec57c1538.tar.gz ellinika-8c1de36d1f8b27fb946dac15e725c93ec57c1538.tar.bz2 |
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.
Diffstat (limited to 'data')
-rw-r--r-- | data/irregular-verbs.xml | 19 |
1 files changed, 18 insertions, 1 deletions
diff --git a/data/irregular-verbs.xml b/data/irregular-verbs.xml index e53e9fd..ac0e7a5 100644 --- a/data/irregular-verbs.xml +++ b/data/irregular-verbs.xml @@ -149,7 +149,14 @@ <act> <root theme="aor">ανέβηκ</root> <root theme="sub">ανέβ</root> + <imp> + <t name="Αόριστος"> + <p n="s" p="2">ανέβε</p> <!-- ή "ανέβα"; --> + <p n="p" p="2">ανεβείτε</p> + </t> + </imp> </act> + <pas/> </v> <v> @@ -159,6 +166,7 @@ <root theme="aor">απένειμ</root> <root theme="sub">απονείμ</root> </act> + <pas/> </v> <v> @@ -212,10 +220,15 @@ <v> <a>βλέπω</a> <c>A</c> - <accmap>000000</accmap> +<!-- <accmap>000000</accmap> --> <act> <root theme="aor">είδ</root> <root theme="sub">δ</root> + <ind> + <t name="Αόριστος"> + <accmap>000000</accmap> + </t> + </ind> <imp> <t name="Αόριστος"> <p n="s" p="2">δες</p> @@ -223,6 +236,10 @@ </t> </imp> </act> + <pas> + <root theme="aor">ειδώθ</root> + <root theme="sub">ιδωθ</root> + </pas> </v> <v> |