Functions |
| static void | addunsolved (pointer labp, pointer *addr) |
| static pointer | eval_read_cond (context *ctx, pointer expr) |
| static pointer | findlabel (eusinteger_t labx) |
| int | gcd (int u, int v) |
| void | initreader (context *ctx) |
| int | is_digit (int ch, int base) |
| pointer | makelabref () |
| void | mul_int_big () |
| static int | nextch (context *ctx, pointer f) |
| pointer | normalize_bignum () |
| static pointer | read1 (context *, pointer) |
| static pointer | read2 (context *, pointer, int, int, int, char *, int) |
| static pointer | read2 (context *ctx, pointer ins, int escaped, int multiescaped, int i, token, int colon) |
| static pointer | read_cond_minus (context *ctx, pointer f) |
| static pointer | read_cond_plus (context *ctx, pointer f) |
| pointer | read_delimited_list (context *ctx, pointer f, int delim_char, token) |
| static pointer | read_sharp_char (context *ctx, pointer f, eusinteger_t val, int subchar) |
| static pointer | read_sharp_comment (context *ctx, pointer f, eusinteger_t val, int subchar) |
| static pointer | read_sharp_eval (context *ctx, pointer f) |
| static pointer | read_sharp_function (context *ctx, pointer f, eusinteger_t val, int subchar) |
| static pointer | read_sharp_hex (context *ctx, pointer f, eusinteger_t val, int subchar) |
| static pointer | read_sharp_object (context *ctx, pointer f) |
| static pointer | read_sharp_octal (context *ctx, pointer f, eusinteger_t val, int subchar) |
| static pointer | read_uninterned_symbol (context *ctx, pointer f, eusinteger_t val, int subchar, token) |
| static pointer | readcomment (context *ctx, pointer f) |
| pointer | reader (context *ctx, pointer f, pointer recursivep) |
| static pointer | readfvector (context *ctx, pointer s) |
| static pointer | readint (context *ctx, char *token, int len) |
| static pointer | readivector (context *ctx, pointer s) |
| static pointer | readlabdef (context *ctx, pointer f, eusinteger_t labx) |
| static pointer | readlabref (context *ctx, pointer f, eusinteger_t val, int subchar) |
| static pointer | readlist (context *ctx, pointer f, char ch, token) |
| static pointer | readobject (context *ctx, pointer s) |
| static pointer | readquote (context *ctx, pointer f) |
| static pointer | readratio (context *ctx, char *token, int slash) |
| static pointer | readrparen (context *ctx, pointer f) |
| static pointer | readsharp (context *ctx, pointer f, Char ch, token) |
| static pointer | readstring (context *ctx, pointer f, int terminator) |
| static pointer | readstructure (context *ctx, pointer s) |
| static pointer | readsymbol (context *ctx, int leng, int colon, token) |
| static pointer | readvector (context *ctx, pointer f, int size) |
| static Char | skip (context *ctx, pointer f, Char ch) |
| int | strtol (char *str, char **ptr, int base) |
Variables |
| enum ch_attr | charattr [256] |
| enum ch_type | chartype [256] |
| byte * | current_syntax [MAXTHREAD] |
| pointer | FEATURES |
| pointer | oblabels [MAXTHREAD] |
| pointer | QAND |
| pointer | QNOT |
| pointer | QOR |
| pointer | QREADTABLE |
| static char * | rcsid = "@(#)$Id$" |
| pointer | READBASE |