diff options
| author | aarne <aarne@cs.chalmers.se> | 2009-04-02 09:35:48 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2009-04-02 09:35:48 +0000 |
| commit | 6bb85a8f41a994ac7adca0fcc4d4907e6cfad939 (patch) | |
| tree | 82eb815a42dc8b470e84fe80fa80fd669fcfc1af /next-lib/src | |
| parent | a94143ee92565dadb1caaf1042f303878059c200 (diff) | |
fixes before beta3 release
Diffstat (limited to 'next-lib/src')
| -rw-r--r-- | next-lib/src/english/MakeStructuralEng.gf | 4 | ||||
| -rw-r--r-- | next-lib/src/english/StructuralEng.gf | 3 | ||||
| -rw-r--r-- | next-lib/src/french/StructuralFre.gf | 4 | ||||
| -rw-r--r-- | next-lib/src/swedish/StructuralSwe.gf | 3 |
4 files changed, 9 insertions, 5 deletions
diff --git a/next-lib/src/english/MakeStructuralEng.gf b/next-lib/src/english/MakeStructuralEng.gf index eeaee1dcf..e2662ba88 100644 --- a/next-lib/src/english/MakeStructuralEng.gf +++ b/next-lib/src/english/MakeStructuralEng.gf @@ -3,8 +3,8 @@ resource MakeStructuralEng = open CatEng, ParadigmsEng, ResEng, MorphoEng, Prelude in { oper - mkConj : Str -> Str -> Number -> Conj = \x,y,n -> - {s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ; +-- mkConj : Str -> Str -> Number -> Conj = \x,y,n -> +-- {s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ; mkSubj : Str -> Subj = \x -> {s = x ; lock_Subj = <>} ; mkNP : Str -> Number -> NP = \s,n -> diff --git a/next-lib/src/english/StructuralEng.gf b/next-lib/src/english/StructuralEng.gf index 1f0715fc5..ba3c58e23 100644 --- a/next-lib/src/english/StructuralEng.gf +++ b/next-lib/src/english/StructuralEng.gf @@ -1,5 +1,6 @@ concrete StructuralEng of Structural = CatEng ** - open MorphoEng, ResEng, ParadigmsEng, (C = ConstructX), Prelude in { + open MorphoEng, ResEng, ParadigmsEng, MakeStructuralEng, + (C = ConstructX), Prelude in { flags optimize=all ; diff --git a/next-lib/src/french/StructuralFre.gf b/next-lib/src/french/StructuralFre.gf index 2bdaeb577..0293db257 100644 --- a/next-lib/src/french/StructuralFre.gf +++ b/next-lib/src/french/StructuralFre.gf @@ -1,7 +1,9 @@ --# -path=.:../abstract:../romance:../common:prelude concrete StructuralFre of Structural = CatFre ** - open PhonoFre, MorphoFre, ParadigmsFre, IrregFre, (X = ConstructX), Prelude in { + open PhonoFre, MorphoFre, ParadigmsFre, IrregFre, (X = ConstructX), + MakeStructuralFre, + Prelude in { flags optimize=all ; coding=utf8 ; diff --git a/next-lib/src/swedish/StructuralSwe.gf b/next-lib/src/swedish/StructuralSwe.gf index 1ec38c245..06883b912 100644 --- a/next-lib/src/swedish/StructuralSwe.gf +++ b/next-lib/src/swedish/StructuralSwe.gf @@ -1,5 +1,6 @@ concrete StructuralSwe of Structural = CatSwe ** - open MorphoSwe, ParadigmsSwe, (X = ConstructX), Prelude in { + open MorphoSwe, ParadigmsSwe, MakeStructuralSwe, + (X = ConstructX), Prelude in { flags optimize=all ; |