added test cases for cyrcular definitions

testsuite/compiler/check/cyclic/abs-types/Test1Abs.gf

@@ -0,0 +1,7 @@
+abstract Test1Abs = {
+
+cat
+  A B ;
+  B A ;
+
+}

testsuite/compiler/check/cyclic/abs-types/Test2Abs.gf

@@ -0,0 +1,10 @@
+abstract Test2Abs = {
+
+cat
+  A ;
+  B A ;
+
+fun f : (x : A) -> B (g x) ;
+    g : (x : A) -> B (f x) ;
+
+}

testsuite/compiler/check/cyclic/abs-types/test1.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/check/cyclic/abs-types/Test1Abs.gf

testsuite/compiler/check/cyclic/abs-types/test1.gfs.gold

@@ -0,0 +1,4 @@
+
+
+
+

testsuite/compiler/check/cyclic/abs-types/test2.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/check/cyclic/abs-types/Test2Abs.gf

testsuite/compiler/check/cyclic/abs-types/test2.gfs.gold

@@ -0,0 +1,4 @@
+
+
+
+

testsuite/compiler/check/cyclic/opers/TestOpers.gf

@@ -0,0 +1,10 @@
+resource TestOpers = {
+
+flags
+  optimize=noexpand;
+
+oper
+  A : Str = B ;
+  B : Str = A ;
+
+}

testsuite/compiler/check/cyclic/opers/test.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/check/cyclic/opers/TestOpers.gf

testsuite/compiler/check/cyclic/opers/test.gfs.gold

@@ -0,0 +1,4 @@
+
+
+
+

testsuite/compiler/check/cyclic/params/TestParams.gf

@@ -0,0 +1,7 @@
+resource TestParams = {
+
+param
+  A = A1 B ;
+  B = B1 A ;
+
+}

testsuite/compiler/check/cyclic/params/test.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/check/cyclic/params/TestParams.gf

testsuite/compiler/check/cyclic/params/test.gfs.gold

@@ -0,0 +1,4 @@
+
+
+
+