Moved x86only tests into stdlib/regression

Makefile

@@ -24,7 +24,6 @@ uninstall:
 
 regression:
 	make clean check -C regression
-	make clean check -C regression/x86only 
 	make clean check -C stdlib/regression
 
 clean:

regression/Makefile

@@ -16,4 +16,3 @@ clean:
 	$(RM) test*.log *.s *~ $(TESTS) *.i
 	$(MAKE) clean -C expressions
 	$(MAKE) clean -C deep-expressions
-	$(MAKE) clean -C x86only

regression/x86only/Lib01.lama

@@ -1,5 +0,0 @@
-public fun from_test005 (s) {
-  printf ("called with %s\n", s)
-}
-
-printf ("Init Lib01...\n")

regression/x86only/Lib02.lama

@@ -1,3 +0,0 @@
-import Lib01;
-
-printf ("Init Lib02...\n")

regression/x86only/Lib03.lama

@@ -1,4 +0,0 @@
-import Lib01;
-import Lib02;
-
-printf ("Init Lib03...\n")

regression/x86only/Makefile

@@ -1,17 +0,0 @@
-TESTS=$(sort $(basename $(wildcard test*.lama)))
-LIBS=$(patsubst %.lama,%.o, $(sort $(wildcard Lib*.lama)))
-
-LAMAC=../../src/lamac
-
-.PHONY: check $(TESTS) 
-
-check: $(TESTS)
-
-%.o: %.lama
-	LAMA=../../runtime $(LAMAC) -c -I . $<
-
-$(TESTS): %: %.lama $(LIBS)
-	LAMA=../../runtime $(LAMAC) -I . $< && cat $@.input | ./$@ > $@.log && diff -u $@.log orig/$@.log
-
-clean:
-	rm -f test*.log *.i *.o *.s *~ $(TESTS)

regression/x86only/orig/test005.log

@@ -1,2 +0,0 @@
-Init Lib01...
-called with that one

regression/x86only/orig/test008.log

@@ -1,4 +0,0 @@
-Init Lib01...
-Init Lib02...
-Init Lib03...
-main dish.

regression/x86only/test001.input

@@ -1 +0,0 @@
-

regression/x86only/test002.input

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

regression/x86only/test003.input

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

regression/x86only/test004.input

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

regression/x86only/test005.input

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

regression/x86only/test005.lama

@@ -1,3 +0,0 @@
-import Lib01;
-
-from_test005 ("that one")

regression/x86only/test006.input

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

regression/x86only/test007.input

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

regression/x86only/test008.input

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

regression/x86only/test008.lama

@@ -1,4 +0,0 @@
-import Lib03;
-import Lib02;
-
-printf ("main dish.\n")

regression/x86only/test009.input

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

runtime/runtime.c

@@ -723,6 +723,10 @@ extern int Lhash (void *p) {
 
 extern int Lcompare (void *p, void *q) {
 # define COMPARE_AND_RETURN(x,y) do if (x != y) return BOX(x - y); while (0)
+  if (q == 0 || p == 0) {
+    failure ("NULL pointer in Lcompare\n");
+  }
+  
   if (p == q) return BOX(0);
   
   if (UNBOXED(p)) {

src/version.ml

@@ -1 +1 @@
-let version = "Version 1.00, c084e57b2, Sun Mar 15 12:41:31 2020 +0300"
+let version = "Version 1.00, e4b34a3ec, Sat Mar 21 13:05:14 2020 +0300"

stdlib/regression/orig/test07.log

@@ -1,6 +1,6 @@
 HashTab internal structure: MNode (-624426958, {[{1, 2, 3}, 100]}, 0, 0, 0)
 HashTab internal structure: MNode (-624426958, {[{1, 2, 3}, 200], [{1, 2, 3}, 100]}, 0, 0, 0)
-Searching: Some (100)
+Searching: Some (200)
 Searching: Some (200)
 Replaced: Some (800)
-Restored: Some (100)
+Restored: Some (200)

stdlib/regression/orig/test26.log

@@ -1,2 +1,2 @@
 Number of commands-line arguments: 1
-  arg [0 ] = "./test009"
+  arg [0 ] = "./test26"

stdlib/regression/test12.lama

@@ -16,4 +16,4 @@ local a   = token ("a"),
       exp = expr ({[Left, {add, sub}], [Left, {mul, div}]}, a) (id),
       i;
 
-printf ("%s\n", parseString (exp |> bypass (eof), gen (10)).string)
+printf ("%s\n", parseString (exp |> bypass (eof), gen (5)).string)