diff options
-rw-r--r-- | builtins.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -7,9 +7,8 @@ #define BuiltinProto(name) int name(Term *, Term *, Goal **, Choicepoint **, Binding **) #define Match(X, Y) (runestrcmp(name, X) == 0 && arity == Y) #define Throw(What) do{\ - Term *t = mkcompound(L"throw", 1, What); \ Goal *g = malloc(sizeof(Goal)); \ - g->goal = t; \ + g->goal = What; \ g->catcher = nil; \ g->next = *goals; \ *goals = g; \ |