mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-20 08:32:50 -06:00
patches to Now and Dan verb forms ; opers and lindefs in JS
This commit is contained in:
@@ -32,7 +32,7 @@ concrete IrregDan of IrregDanAbs = CatDan ** open Prelude, ParadigmsDan in {
|
||||
give_V = irregV "give" "gav" "givet" ;
|
||||
gnide_V = irregV "gnide" "gned" "gnidd" ;--
|
||||
gøre_V = irregV "gøre" "gjorde" "gjort" ;
|
||||
have_V = mkV "have" "har" "havde" "haft" nonExist "hav" ;
|
||||
have_V = mkV "have" "har" "havde" "haft" "havd" "hav" ;
|
||||
hente_V = irregV "hente" "hentet" "hendt" ;--
|
||||
-- hete_V = irregV "hete" (variants {"het" ;-- "hette"}) "hett" ;--
|
||||
-- hjelpe_V = irregV "hjelpe" "hjalp" "hjulpet" ;--
|
||||
@@ -69,4 +69,4 @@ concrete IrregDan of IrregDanAbs = CatDan ** open Prelude, ParadigmsDan in {
|
||||
|
||||
}
|
||||
|
||||
-- readFile "vrbs.tmp" >>= mapM_ (putStrLn . (\ (a:_:b:c:_) -> " " ++ a ++ "_V = irregV \"" ++ a ++ "\" \"" ++ b ++ "\" \"" ++ c ++ "\" ;") . words) . lines
|
||||
-- readFile "vrbs.tmp" >>= mapM_ (putStrLn . (\ (a:_:b:c:_) -> " " ++ a ++ "_V = irregV \"" ++ a ++ "\" \"" ++ b ++ "\" \"" ++ c ++ "\" ;") . words) . lines
|
||||
|
||||
Reference in New Issue
Block a user