From a37ae2f0170499be1a95031d24ff86aac5cf46f1 Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Fri, 9 Jul 2021 20:09:22 +0000 Subject: Add asserta/1, assertz/1, retract/1, abolish/1 (and retract_one/1, which is retract/1 but doesn't backtrack) --- fns.h | 2 ++ 1 file changed, 2 insertions(+) (limited to 'fns.h') diff --git a/fns.h b/fns.h index dd3745b..5a5ba88 100644 --- a/fns.h +++ b/fns.h @@ -66,6 +66,8 @@ void writeterm(Term *, Term *, Term *); void initmodules(void); Module *parsemodule(char *); Module *getmodule(Rune *); +Clause *appendclause(Clause *, Clause *); +Predicate *appendpredicate(Predicate *, Predicate *); /* types.c */ int islist(Term *); -- cgit v1.2.3