shithub: sl

Download patch

ref: ed1123209285cf52dc08cab9875e242128f1b3ef
parent: 9cdf5ac21da071741eaee93395765c3fb3ef66ea
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Tue Dec 24 13:06:21 EST 2024

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