ref: e022f4118f7a64dcd6e4a680756741b846d592e4
parent: a49e77278cc791b65e0d922d2625971900287af1
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Fri Nov 29 20:06:07 EST 2024
disable Fl in TLS in debug mode for now
--- a/flisp.c
+++ b/flisp.c
@@ -24,7 +24,10 @@
builtin_t fptr;
}builtinspec_t;
-__thread Fl *fl;
+#ifdef NDEBUG
+__thread
+#endif
+Fl *fl;
bool
isbuiltin(value_t x)
--- a/flisp.h
+++ b/flisp.h
@@ -434,7 +434,12 @@
int hpos, vpos;
};
-extern __thread Fl *fl;
+extern
+#ifdef NDEBUG
+__thread
+#endif
+Fl *fl;
+
#define FL(f) fl->f
extern double D_PNAN, D_NNAN, D_PINF, D_NINF;