Experiment with putting logic vars on the stack.

2019-08-11 21:30:02 -07:00
parent 222c472449
commit 2e1f598aa2
4 changed files with 7 additions and 2 deletions
@@ -91,6 +91,7 @@ func(clear,        _ ,      []).
 func(first, [[X|_]|S],   [X|S]).
 func(rest,  [[_|X]|S],   [X|S]).
 func(unit,      [X|S], [[X]|S]).
+func(thunk,        S ,   [X|S]).

 func(rolldown, [A, B, C|S], [B, C, A|S]).
 func(dupd,        [A, B|S], [A, B, B|S]).