From 02145f06ac007d730bc16930185fe18fa3e76c68 Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Tue, 29 Jun 2021 15:51:04 +0000 Subject: Add a term parser. --- dat.h | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) (limited to 'dat.h') diff --git a/dat.h b/dat.h index d6a72bb..7c7c0a9 100644 --- a/dat.h +++ b/dat.h @@ -1 +1,28 @@ +typedef struct Term Term; +struct Term +{ + int tag; + + Rune *text; + int arity; + Term *next; + Term *children; + int numbertype; + vlong ival; + double dval; +}; + +enum { + CompoundTerm, + AtomTerm, + VariableTerm, + NumberTerm, + StringTerm, +}; + +enum { + NumberInt, + NumberFloat, +}; + int debug; \ No newline at end of file -- cgit v1.2.3