ref: 547836a03d5d3cd2dc0d7459edafeb4c6d677415
dir: /read.h/
#pragma once value_t fl_read_sexpr(value_t f); bool fl_read_numtok(const char *tok, value_t *pval, int base); // defines which characters are ordinary symbol characters. // 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("()[]{}'\";`,\\| \a\b\f\n\r\t\v", (c)))