diff options
| author | bjorn <bjorn@bringert.net> | 2008-11-21 12:33:56 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-11-21 12:33:56 +0000 |
| commit | b047a99a84c1b21f60b44eb12d7a11e9f3d056ea (patch) | |
| tree | 982c40974ff7ae0dd17c1876434fb1e6226f4c07 /next-lib/src/parse/ParseEng.gf | |
| parent | 289618b81f65438af98196a33f84e314bca71df1 (diff) | |
Added CompCN to ParseEng. Perhaps this should move to NounEng.
Diffstat (limited to 'next-lib/src/parse/ParseEng.gf')
| -rw-r--r-- | next-lib/src/parse/ParseEng.gf | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/next-lib/src/parse/ParseEng.gf b/next-lib/src/parse/ParseEng.gf index 88b3ec9a1..80fd6da0f 100644 --- a/next-lib/src/parse/ParseEng.gf +++ b/next-lib/src/parse/ParseEng.gf @@ -30,7 +30,7 @@ concrete ParseEng of ParseEngAbs = VA, become_VA], BigLexEng - ** open ParadigmsEng, ResEng, MorphoEng, ParamX, Prelude in { + ** open ParadigmsEng, ResEng, MorphoEng, NounEng, ParamX, Prelude in { flags startcat = Phr ; unlexer = text ; lexer = text ; @@ -125,6 +125,9 @@ lin a = agrP3 Sg } ; + CompCN cn = { s = \\a => let n = (fromAgr a).n + in IndefArt.s ! False ! n ++ cn.s ! n ! Acc} ; + -- Lexical additions lin |