shithub: femtolisp

Info  •  Files  •  Log  •  Branches

get_type: make isarray a bool

--- a/types.c

+++ b/types.c

@@ -16,7 +16,7 @@

 	if(*bp != HT_NOTFOUND)

 		return *bp;

-	int align, isarray = iscons(t) && car_(t) == FL(arraysym) && iscons(cdr_(t));

+	bool isarray = iscons(t) && car_(t) == FL(arraysym) && iscons(cdr_(t));

 	size_t sz;

 	if(isarray && !iscons(cdr_(cdr_(t)))){

 		// special case: incomplete array type