ref: 2e8caea3fb2dc18b3a1e5f51c62ca49c841d850e
dir: /read.h/
#pragma once
value_t fl_read_sexpr(value_t f);
int isnumtok_base(char *tok, value_t *pval, int base);
int isnumtok(char *tok, value_t *pval);
// 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)))