diff options
Diffstat (limited to 'examples/bronzeage/SwadeshIta.gf')
| -rw-r--r-- | examples/bronzeage/SwadeshIta.gf | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/examples/bronzeage/SwadeshIta.gf b/examples/bronzeage/SwadeshIta.gf index f3afd9243..d80d5e594 100644 --- a/examples/bronzeage/SwadeshIta.gf +++ b/examples/bronzeage/SwadeshIta.gf @@ -36,8 +36,14 @@ concrete SwadeshIta of Swadesh = CatIta n = Pl } ; --- left_Ord = regA "sinistro" ; --- right_Ord = regA "destro" ; + left_Ord = mkOrd (regA "sinistro") ; + right_Ord = mkOrd (regA "destro") ; + + oper + mkOrd : A -> Ord ; + mkOrd x = {s = \\ag => x.s ! Posit ! AF ag.g ag.n; lock_Ord = <> } ; + + lin -- Adverbs |