shithub: femtolisp

Download patch

ref: b3a21a0ff408e559639f6c31e1a2ab970787567f
parent: 1b38f3de22cbaad22fbd3182cc65f22e7f4ba10f
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Wed Jul 12 15:20:46 EDT 2023

symchar: move the string inside strchr call

--- a/read.h
+++ b/read.h
@@ -9,8 +9,7 @@
 // exceptions are '.', which is an ordinary symbol character
 // unless it's the only character in the symbol, and '#', which is
 // an ordinary symbol character unless it's the first character.
-#define symchar(c) (!strchr(symspecials, (c)))
-static char symspecials[] = "()[]'\";`,\\| \a\b\f\n\r\t\v";
+#define symchar(c) (!strchr("()[]'\";`,\\| \a\b\f\n\r\t\v", (c)))
 
 #endif