Lines Matching refs:thistoken
572 return instance->thistoken = ALISP_INTEGER;
592 instance->thistoken = ALISP_INTEGER;
598 return instance->thistoken = EOF;
602 if (c == '.' && instance->thistoken == ALISP_INTEGER) {
606 instance->thistoken = ALISP_FLOAT;
612 } else if (c == 'e' && instance->thistoken == ALISP_FLOAT) {
615 instance->thistoken = ALISP_FLOATE;
622 return instance->thistoken;
643 return instance->thistoken = EOF;
650 return instance->thistoken = ALISP_IDENTIFIER;
659 return instance->thistoken = EOF;
681 return instance->thistoken = ALISP_STRING;
684 return instance->thistoken = c;
695 int thistoken;
698 while ((thistoken = gettoken(instance)) != ')' && thistoken != EOF) {
702 if (thistoken == '.') {
713 if ((thistoken = gettoken(instance)) != ')') {
777 int thistoken;
781 thistoken = gettoken(instance);
783 thistoken = instance->thistoken;
785 switch (thistoken) {
816 lisp_warn(instance, "%d:%d: unexpected character `%c'", instance->lineno, instance->charno, thistoken);