added some tests in the testsuite for the compiler

testsuite/compiler/check/lins/lins.gfs.gold

@@ -1,8 +1,6 @@
 checking module linsCnc␍
-Warning: no linearization type for C, inserting default {s : Str}␍
+   Warning: no linearization type for C, inserting default {s : Str}␍
-checking module linsCnc␍
+   Warning: no linearization of test␍
-Warning: no linearization of test␍
-␍
 language linsCnc␍
 productions␍
   C1 -> F0[]␍

testsuite/compiler/check/oper-definition/Res.gf

@@ -0,0 +1,5 @@
+resource Res = {
+
+oper my_oper : Str -> Str ;
+
+}

testsuite/compiler/check/oper-definition/test.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/check/oper-definition/Res.gf

testsuite/compiler/check/oper-definition/test.gfs.gold

@@ -0,0 +1,5 @@
+␍
+␍
+checking module Res␍
+   Happened in operation my_oper in Res.gf, line 3 :␍
+      No definition given to the operation␍

testsuite/compiler/check/restricted-inheritance/A.gf

@@ -0,0 +1,8 @@
+abstract A = {
+
+cat A1; A2 ;
+fun f1 : A1 ;
+    f2 : A1 ;
+    g  : A2 ;
+
+}

testsuite/compiler/check/restricted-inheritance/B.gf

@@ -0,0 +1,3 @@
+abstract B = A - [A1] ** {
+
+}

testsuite/compiler/typecheck/abstract/A.gf

@@ -0,0 +1,6 @@
+abstract A = {
+
+cat A ;
+    B (A 1) ;
+
+}

testsuite/compiler/typecheck/abstract/B.gf

@@ -0,0 +1,7 @@
+abstract B = {
+
+cat S ;
+
+fun f : S -> S 1 ;
+
+}

testsuite/compiler/typecheck/abstract/C.gf

@@ -0,0 +1,8 @@
+abstract C = {
+
+cat S ;
+
+fun f : S -> S ;
+def f x = 1 ;
+
+}

testsuite/compiler/typecheck/abstract/test_A.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/typecheck/abstract/A.gf␍

testsuite/compiler/typecheck/abstract/test_A.gfs.gold

@@ -0,0 +1,5 @@
+␍
+␍
+checking module A␍
+   Prod expected for function % A. A instead of Type␍
+   in category B in A.gf, line 4␍

testsuite/compiler/typecheck/abstract/test_B.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/typecheck/abstract/B.gf␍

testsuite/compiler/typecheck/abstract/test_B.gfs.gold

@@ -0,0 +1,5 @@
+␍
+␍
+checking module B␍
+   Prod expected for function % B. S instead of Type␍
+   in type of function f in B.gf, line 5␍

testsuite/compiler/typecheck/abstract/test_C.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/typecheck/abstract/C.gf

testsuite/compiler/typecheck/abstract/test_C.gfs.gold

@@ -0,0 +1,5 @@
+␍
+␍
+checking module C␍
+   {Int<>S}␍
+   in definition of function f in C.gf, line 6␍

testsuite/compiler/typecheck/concrete/A.gf

@@ -0,0 +1,7 @@
+resource A = {
+
+oper a_Det : Str = "a" ;
+     
+     silly : Str = a_Det "X" ;
+
+}

testsuite/compiler/typecheck/concrete/test_A.gfs

@@ -0,0 +1 @@
+i testsuite/compiler/typecheck/concrete/A.gf␍

testsuite/compiler/typecheck/concrete/test_A.gfs.gold

@@ -0,0 +1,5 @@
+␍
+␍
+checking module A␍
+   Happened in operation silly in A.gf, line 5 :␍
+      A function type is expected for a_Det instead of type Str␍