fixed infinitives and imperatives

This commit is contained in:
aarne
2005-01-24 15:56:28 +00:00
parent 8425fe4a87
commit e96a410e74
12 changed files with 120 additions and 94 deletions

View File

@@ -118,10 +118,16 @@ instance SyntaxNor of SyntaxScand = TypesNor **
reflPron : Number -> Person -> Str = \n,p -> case <n,p> of {
<Sg,P1> => "meg" ;
<Sg,P2> => "meg" ;
<Sg,P2> => "deg" ;
<Pl,P1> => "oss" ;
<Pl,P2> => "jer" ;
_ => "seg"
} ;
progressiveVerbPhrase : VerbPhrase -> VerbGroup =
complVerbVerb
(verbVara **
{s3 = ["ved at"]}
) ;
}

View File

@@ -68,6 +68,7 @@ lin
Important = extAdjective (aAbstrakt "viktig") ** {s2 = "for"} ;
Probable = extAdjective (aAbstrakt "sannsynlig") ;
Easy = extAdjective (aRod "grei") ** {s2 = "for"} ;
Rain = extTransVerb (vNopart (vHusk "regn")) [] ;
} ;