moved lib/next-resource to next-lib/src, to enable linking with next-lib as value of GF_LIB_PATH

1 files changed, 19 insertions, 0 deletions

diff --git a/next-lib/src/common/ConstructX.gf b/next-lib/src/common/ConstructX.gf
new file mode 100644
index 000000000..ee4decf00
--- /dev/null
+++ b/next-lib/src/common/ConstructX.gf
@@ -0,0 +1,19 @@
+--# -path=.:../abstract:prelude
+
+resource ConstructX = open CommonX in {
+
+  oper
+    mkText : Str -> Text = \s -> {s = s ; lock_Text = <>} ; 
+    mkPhr  : Str -> Phr  = \s -> {s = s ; lock_Phr = <>} ; 
+    mkUtt : Str -> Utt  = \s -> {s = s ; lock_Utt = <>} ;
+    mkVoc : Str -> Voc  = \s -> {s = s ; lock_Voc = <>} ;
+    mkSC : Str -> SC  = \s -> {s = s ; lock_SC = <>} ;
+    mkAdv : Str -> Adv  = \s -> {s = s ; lock_Adv = <>} ;
+    mkAdV : Str -> AdV  = \s -> {s = s ; lock_AdV = <>} ;
+    mkAdA : Str -> AdA  = \s -> {s = s ; lock_AdA = <>} ;
+    mkAdN : Str -> AdN  = \s -> {s = s ; lock_AdN = <>} ;
+    mkIAdv : Str -> IAdv  = \s -> {s = s ; lock_IAdv = <>} ;
+    mkCAdv : Str -> CAdv  = \s -> {s = s ; lock_CAdv = <>} ;
+    mkPConj : Str -> PConj  = \s -> {s = s ; lock_PConj = <>} ;
+
+}