Minor cleanup.

This commit is contained in:
Simon Forman
2019-05-04 07:53:02 -07:00
parent 6c94313061
commit 0da935ed94
+3 -3
View File
@@ -1,10 +1,10 @@
% A Tracing Meta-Interpreter for Thun
tmi(true).
tmi(!).
tmi((A, B)) :- tmi(A), tmi(B).
tmi(number(A)) :- !, number(A).
tmi(var(A)) :- !, var(A).
tmi(!) :- !.
tmi(number(A)) :- number(A).
tmi(var(A)) :- var(A).
% Meta-logical print trace.
% (Could also be captured in a list or something instead.)