diff options
| author | aarne <aarne@chalmers.se> | 2015-07-23 16:16:38 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2015-07-23 16:16:38 +0000 |
| commit | a1a602c6810b572eec99a66112337ee6d2c2d5d1 (patch) | |
| tree | 9f58881d775761e41836781aff98df114fde3d2b /examples | |
| parent | 3788098e0af1cb85ecfbbbae39c4edeb621f1f85 (diff) | |
rewrote an mkPN application in WordsGer to work around a problem that might be a type checker bug
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/phrasebook/WordsGer.gf | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/phrasebook/WordsGer.gf b/examples/phrasebook/WordsGer.gf index 2fba5a0db..4984eb080 100644 --- a/examples/phrasebook/WordsGer.gf +++ b/examples/phrasebook/WordsGer.gf @@ -230,7 +230,7 @@ CitRestaurant cit = mkCNPlace (mkCN cit (mkN "Restaurant" "Restaurants" neuter) prop = mkA adj ; country = mkNP (mkPN co)} ; mkDay : Str -> {name : NP ; point : Adv ; habitual : Adv} = \d -> - let day = mkNP (mkPN d) in + let day = mkNP (mkPN d masculine) in {name = day ; point = SyntaxGer.mkAdv (mkPrep "am" dative) day ; ---- am habitual = ParadigmsGer.mkAdv (d + "s") ---- |