From 0f958749e189e4dacd7a1f70cfc33460e1228d3b Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Wed, 7 Jul 2021 16:32:02 +0000 Subject: Make '=..'/2 work according to spec. Introduce types.c for functions which tells us something about term types. Should be used a lot more instead of explicitly looking into terms->tag everywhere --- fns.h | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to 'fns.h') diff --git a/fns.h b/fns.h index 7255166..d548d6e 100644 --- a/fns.h +++ b/fns.h @@ -63,4 +63,12 @@ void writeterm(Term *, Term *, Term *); /* module.c */ void initmodules(void); Module *parsemodule(char *); -Module *getmodule(Rune *); \ No newline at end of file +Module *getmodule(Rune *); + +/* types.c */ +int islist(Term *); +int ispartiallist(Term *t); +int isemptylist(Term *); +int isnonemptylist(Term *); +Term *listhead(Term *); +Term *listtail(Term *); -- cgit v1.2.3