diff options
| author | aarne <unknown> | 2003-11-17 15:17:53 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2003-11-17 15:17:53 +0000 |
| commit | 70c9f7b365b07044c07837a04223a11dfa3b7140 (patch) | |
| tree | b39c484dd86d6226f716f241da0b4a85a630a6a0 /grammars/resource | |
| parent | 9d55f72d7a97658faa6ebc890535fa0c6e665a05 (diff) | |
Lexer by need.
Diffstat (limited to 'grammars/resource')
| -rw-r--r-- | grammars/resource/swedish/SyntaxSwe.gf | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/grammars/resource/swedish/SyntaxSwe.gf b/grammars/resource/swedish/SyntaxSwe.gf index c26a07bc8..9b9897ee1 100644 --- a/grammars/resource/swedish/SyntaxSwe.gf +++ b/grammars/resource/swedish/SyntaxSwe.gf @@ -507,7 +507,7 @@ oper DitransVerb = TransVerb ** {s3 : Preposition} ; mkDitransVerb : Verb -> Preposition -> Preposition -> DitransVerb = \v,p1,p2 -> - v ** {s3 = p1 ; s3 = p2} ; + v ** {s2 = p1 ; s3 = p2} ; complDitransVerb : Bool -> DitransVerb -> NounPhrase -> NounPhrase -> VerbPhrase = @@ -538,7 +538,7 @@ oper s3 = \\g,n => spelar.s3 ! g ! n ++ (if_then_else Str postp bra.s []) } ; - advAdjPhrase : Adverb -> AdjPhrase -> AdjPhrase = \mycket, dyr -> + advAdjPhrase : SS -> AdjPhrase -> AdjPhrase = \mycket, dyr -> {s = \\a,c => mycket.s ++ dyr.s ! a ! c ; p = dyr.p } ; @@ -903,7 +903,7 @@ oper -- This class covers adverbials such as "annars", "därför", which are prefixed -- to a sentence to form a phrase. - advSentence : Adverb -> Sentence -> Utterance = \annars,soverhan -> + advSentence : SS -> Sentence -> Utterance = \annars,soverhan -> ss (annars.s ++ soverhan.s ! Inv ++ ".") ; |