shithub: sl

Download patch

ref: 6897271228d9851147273896b1ed901f94a34750
parent: f3ac39d0ad96c5a465044e2a38d81713908454c3
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Mon Feb 10 14:29:29 EST 2025

alloc_words: at least two cells alloc no longer required on 64-bit platforms

--- a/src/flisp.c
+++ b/src/flisp.c
@@ -311,10 +311,8 @@
 {
 	value_t *first;
 
-#if defined(BITS64)
-	if(fl_unlikely(n < 2))
-		n = 2;
-#else
+#if !defined(BITS64)
+	// force 8-byte alignment
 	if(n & 1)
 		n++;
 #endif