From 4fc362c06ba0f5e1298952350b6ef37ab0962923 Mon Sep 17 00:00:00 2001 From: aarne Date: Tue, 17 Jun 2008 13:16:15 +0000 Subject: [PATCH] started examples-3.0 with examples that are tested to work --- resource-1.4/bulgarian/MorphoFunsBul.gf | 4 ++-- resource-1.4/interlingua/ResIna.gf | 8 ++++---- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/resource-1.4/bulgarian/MorphoFunsBul.gf b/resource-1.4/bulgarian/MorphoFunsBul.gf index aadec25b2..d450b161f 100644 --- a/resource-1.4/bulgarian/MorphoFunsBul.gf +++ b/resource-1.4/bulgarian/MorphoFunsBul.gf @@ -101,7 +101,7 @@ oper --3 Other verbs -- - V2S, V2V, V2Q : Type = V2 ; +-- V2S, V2V, V2Q : Type = V2 ; mkV2S : V -> Prep -> V2S ; mkV2S v p = prepV2 v p ** {lock_V2 = <>} ; @@ -179,4 +179,4 @@ oper mkIAdv : Str -> IAdv ; mkIAdv s = {s = table {QDir=>s;QIndir=>s+"то"}; lock_IAdv = <>} ; -} \ No newline at end of file +} diff --git a/resource-1.4/interlingua/ResIna.gf b/resource-1.4/interlingua/ResIna.gf index 3a7b495d4..c81324f0d 100644 --- a/resource-1.4/interlingua/ResIna.gf +++ b/resource-1.4/interlingua/ResIna.gf @@ -225,10 +225,10 @@ resource ResIna = ParamX ** open Prelude in { }; tenseToVFrom = table { - Pres => VPres; - Past => VPast; - Fut => VFut; - Cond => VCond + Pres => VPres + ;Past => VPast; --# notpresent + Fut => VFut; --# notpresent + Cond => VCond --# notpresent }; insertInvarObj : Str -> VP -> VP = \obj -> insertObj "" Acc (mkInvarNP obj);