klisp

an open source interpreter for the Kernel Programming Language.
git clone http://git.hanabi.in/repos/klisp.git
Log | Files | Refs | README

commit 536ab36df520e9e8a05fb33d1bd2144e4a4e9e5f
parent 50cfacec5d3c5b884250b7564af50f6e55652f01
Author: Andres Navarro <canavarro82@gmail.com>
Date:   Thu, 14 Apr 2011 20:39:18 -0300

Bugfix: corrected name in Makefile: klispconf.h NOT kconf.h. Changed ttiscollectable to iscollectable in kobject.h.

Diffstat:
Msrc/Makefile | 2+-
Msrc/kobject.h | 3+--
2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/Makefile b/src/Makefile @@ -42,7 +42,7 @@ clean: klisp.o: klisp.c klisp.h kobject.h kread.h kwrite.h klimits.h kstate.h kmem.h \ kerror.h kauxlib.h koperative.h kenvironment.h kcontinuation.h \ kapplicative.h koperative.h keval.h krepl.h -kobject.o: kobject.c kobject.h klimits.h kconf.h +kobject.o: kobject.c kobject.h klimits.h klispconf.h ktoken.o: ktoken.c ktoken.h kobject.h kstate.h kpair.h kstring.h ksymbol.h \ kerror.h klisp.h kinteger.h kinteger.o: kinteger.c kinteger.h kobject.h kstate.h kmem.h klisp.h imath.h \ diff --git a/src/kobject.h b/src/kobject.h @@ -239,9 +239,8 @@ typedef struct __attribute__ ((__packed__)) GCheader { (bigints, rationals, etc could be collectable) maybe we should use a better way for this, to speed up checks, maybe use a flag? */ -#define ttiscollectable(o) ({ uint8_t t = ttype(o); \ +#define iscollectable(o) ({ uint8_t t = ttype(o); \ (t == K_TBIGINT || t == K_TBIGRAT || t >= K_FIRST_GC_TYPE); }) -#define ttiscollectible(o) ttiscollectable(o) #define ttisstring(o) (tbasetype_(o) == K_TAG_STRING) #define ttissymbol(o) (tbasetype_(o) == K_TAG_SYMBOL)