syntax fix (compiler warning)

dragoncoder047 · dragoncoder047 · commit 81afbcf606d0 · 2022-08-18T13:47:48.000-04:00
diff --git a/ulisp-esp32.ino b/ulisp-esp32.ino
@@ -5662,7 +5662,8 @@ object *nextitem (gfun_t gfun) {
     sym = internlong(buffer);
   }
   if (buffer[0] == ':') { // handle keywords
-    if (!lookupbuiltin(buffer) != ENDFUNCTIONS) sym = cons(bsymbol(QUOTE), cons(sym, nil)); // keywords quote themselves
+    if (lookupbuiltin(buffer) == ENDFUNCTIONS) // make sure it isn't a special keyword
+      sym = cons(bsymbol(QUOTE), cons(sym, nil)); // keywords quote themselves
   }
   return sym;
 }

Original file line number	Diff line number	Diff line change
`@@ -5662,7 +5662,8 @@ object *nextitem (gfun_t gfun) {`
`5662`	`5662`	`sym = internlong(buffer);`
`5663`	`5663`	`}`
`5664`	`5664`	`if (buffer[0] == ':') { // handle keywords`
`5665`		`- if (!lookupbuiltin(buffer) != ENDFUNCTIONS) sym = cons(bsymbol(QUOTE), cons(sym, nil)); // keywords quote themselves`
	`5665`	`+ if (lookupbuiltin(buffer) == ENDFUNCTIONS) // make sure it isn't a special keyword`
	`5666`	`+ sym = cons(bsymbol(QUOTE), cons(sym, nil)); // keywords quote themselves`
`5666`	`5667`	`}`
`5667`	`5668`	`return sym;`
`5668`	`5669`	`}`