1
0
forked from GitHub/gf-core

aux and slash

This commit is contained in:
aarne
2005-02-09 14:45:48 +00:00
parent 71c316cfc5
commit 375a4fba7a
12 changed files with 250 additions and 190 deletions

View File

@@ -154,7 +154,7 @@ oper
-- The verbs "be" and "have" are special.
vBe : V ;
---- vBe : V ;
vHave : V ;
-- Verbs with a particle.
@@ -281,7 +281,6 @@ oper
mkV2 = \v,p -> v ** {lock_V2 = <> ; s3 = p} ;
tvPartReg = \get, along, to -> mkV2 (vPartReg get along) to ;
vBe = verbBe ** {s1 = [] ; lock_V = <>} ;
vHave = verbP3Have ** {s1 = [] ; lock_V = <>} ;
tvGen = \s,p -> mkV2 (vGen s) p ;