diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-11-14 17:39:05 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-11-14 17:39:05 +0000 |
| commit | 6b4f9715e6acb87e05b8229bafd1f41d906e6409 (patch) | |
| tree | 518851d83cee0d75283694f65ceddf671d299bc9 /examples/attempto/LexAttemptoSwe.gf | |
| parent | d5fa908250517476d69fae92ec7648a207007c0a (diff) | |
attempto almost complete to spec now
Diffstat (limited to 'examples/attempto/LexAttemptoSwe.gf')
| -rw-r--r-- | examples/attempto/LexAttemptoSwe.gf | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/examples/attempto/LexAttemptoSwe.gf b/examples/attempto/LexAttemptoSwe.gf index 04cf4398c..31d145f19 100644 --- a/examples/attempto/LexAttemptoSwe.gf +++ b/examples/attempto/LexAttemptoSwe.gf @@ -1,5 +1,6 @@ instance LexAttemptoSwe of LexAttempto = - open ExtraSwe, SyntaxSwe, ParadigmsSwe, ConstructX, IrregSwe in { + open ExtraSwe, SyntaxSwe, ParadigmsSwe, ConstructX, + MakeStructuralSwe, IrregSwe in { oper possible_A = mkA "möjlig" ; @@ -14,4 +15,12 @@ oper genitiveNP np = mkNP (GenNP np) ; each_Det = every_Det ; ---- + + that_Subj = mkSubj "att" ; + + comma_and_Conj = mkConj [] ", och" plural ; + comma_or_Conj = mkConj [] ", eller" singular ; + slash_Conj = mkConj [] "/" singular ; + + } |