Thanks Alex! I appreciate the insight!
On Sat, Feb 1, 2025 at 1:45 AM Alexander Burger <picolisp@software-lab.de> wrote: > ('(" " "^I" "^J" "^M") .. > > Strictly speaking this is not correct or at least not needed, as 'case' > does not evaluate the CARs. > Thanks! I'll fix. I still confuse instances of when CARs and arguments in general are, or not, evaluated. > so the symbol 'quote' is simply also checked for. > In other use cases this might cause me no end of frustration. :) > (de jsonSkipWhiteSpace (Lst) > (while (member (car Lst) '(" " "^I" "^J" "^M")) > (++ Lst) ) > Lst ) > I will try this. Much easier to follow! > But anyway, it could be just > (seek '(((C)) (not (sp? C))) Lst) > 'seek' I did not know about. Very useful! 'sp?' I didn't use here because I wasn't sure what it considers white space and I just wanted to match the set defined in the json spec. /Lindsay