shithub: MicroHs

Download patch

ref: a9695acf0eef4d63ff1b8e28dcdbd6027e1d724e
parent: e66b1f33ed244f19c34cd6dc11eab5a75768cf86
author: Lennart Augustsson <lennart@augustsson.net>
date: Sat Sep 16 14:30:08 EDT 2023

Move #if around.

--- a/src/runtime/eval.c
+++ b/src/runtime/eval.c
@@ -494,12 +494,12 @@
 mark(NODEPTR *np)
 {
   NODEPTR n;
-  //value_t i;
+#if GCRED
+  value_t i;
+#endif
 
   top:
   n = *np;
-#if GCRED
-#endif
   if (GETTAG(n) == T_IND) {
 #if SANITY
     int loop = 0;
--