| commit | 2999dd1ec16e5e3fe7b504891dd37e3afef6da71 | [log] [tgz] |
|---|---|---|
| author | swissChili <swisschili@fastmail.com> | Fri Jul 02 14:19:53 2021 -0700 |
| committer | swissChili <swisschili@fastmail.com> | Fri Jul 02 14:19:53 2021 -0700 |
| tree | 694072489f98b60e7fcc5bfc688d1e58af0172d3 | |
| parent | d24cd204347957c644bd99d3047ade9b32bcdcc1 [diff] [blame] |
Add macros
diff --git a/src/lisp/lisp.h b/src/lisp/lisp.h index 56fa09f..eb9e5f6 100644 --- a/src/lisp/lisp.h +++ b/src/lisp/lisp.h
@@ -23,11 +23,20 @@ struct cons; +/// Represents a Lisp value typedef unsigned int value_t; struct cons { value_t car, cdr; + + /// Line of the input file from where this was parsed, 0 if it was created + /// in Lisp. + int line; + + /// Description of where the cons was parsed from, or NULL if generated in + /// code. + char *name; }; /// Default pool (no pool)