add more tests

for some of the recently closed issues
This commit is contained in:
Skgland
2021-03-11 01:52:22 +01:00
parent d437609365
commit 8f41603101
8 changed files with 177 additions and 0 deletions
+4
View File
@@ -0,0 +1,4 @@
% hello
% line!
a :- b(X).
+3
View File
@@ -0,0 +1,3 @@
test :- write(world), nl.
:- initialization(write(hello)).
+1
View File
@@ -0,0 +1 @@
:- initialization(call).
+1
View File
@@ -0,0 +1 @@
:- op(900, fy, [$,@]).
+3
View File
@@ -0,0 +1,3 @@
:- set_prolog_flag(occurs_check, true).
f(X, g(X)).
+1
View File
@@ -0,0 +1 @@
:- initialization(throw(e)).