Define the param UseGen and make use of that

2017-08-22 11:38:38 +03:00
parent 1362bbdd03
commit 2665910dc2
4 changed files with 14 additions and 6 deletions
@@ -34,6 +34,8 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in {
     | VInfinitive
     ;

+    UseGen = NoGen | YesGen Agr;
+
  oper
    Verb : Type = {
      s : VForm => Str