52 	switch (cx.x_type) {  in s_getc()
54 		c = getc(cx.x_fp);  in s_getc()
55 		if (cx.x_bol && c != EOF) {  in s_getc()
56 			cx.x_bol = 0;  in s_getc()
57 			cx.x_lineno++;  in s_getc()
60 			cx.x_bol = 1;  in s_getc()
63 		if (*cx.x_bufp != 0)  in s_getc()
64 			return *cx.x_bufp++ & 0xff;  in s_getc()
77 	switch (cx.x_type) {  in s_ungetc()
79 		cx.x_bol = 0;  in s_ungetc()
80 		return ungetc(c, cx.x_fp);  in s_ungetc()
82 		if (cx.x_bufp > cx.x_buf)  in s_ungetc()
83 			return *--cx.x_bufp = c;  in s_ungetc()
109 			cx.x_token = T_EOL;  in s_gettok()
116 			cx.x_token = T_EOF;  in s_gettok()
154 			cx.x_val.v_num = 0;  in s_gettok()
159 			cx.x_val.v_num = c - '0';  in s_gettok()
184 			cx.x_token = T_COMP;  in s_gettok()
188 			cx.x_token = T_PLUS;  in s_gettok()
192 			cx.x_token = T_MINUS;  in s_gettok()
196 			cx.x_token = T_MUL;  in s_gettok()
200 			cx.x_token = T_DIV;  in s_gettok()
204 			cx.x_token = T_MOD;  in s_gettok()
208 			cx.x_token = T_XOR;  in s_gettok()
212 			cx.x_token = T_LP;  in s_gettok()
216 			cx.x_token = T_RP;  in s_gettok()
220 			cx.x_token = T_COMMA;  in s_gettok()
224 			cx.x_token = T_QUEST;  in s_gettok()
228 			cx.x_token = T_COLON;  in s_gettok()
232 			cx.x_token = T_LB;  in s_gettok()
236 			cx.x_token = T_RB;  in s_gettok()
240 			cx.x_val.v_num = c;  in s_gettok()
241 			cx.x_token = T_CHAR;  in s_gettok()
294 			cx.x_token = T_STR;  in s_gettok()
298 					cx.x_token = T_IF;  in s_gettok()
303 					cx.x_token = T_THEN;  in s_gettok()
309 					cx.x_token = T_ENDIF;  in s_gettok()
315 							cx.x_token = T_ELSIF;  in s_gettok()
319 								cx.x_token =  in s_gettok()
326 			if (cx.x_token == T_STR  in s_gettok()
327 			    && (cx.x_val.v_str = str_cpy(buf)) == 0) {  in s_gettok()
329 				cx.x_token = T_EOF;  in s_gettok()
389 			cx.x_val.v_num = 0;  in s_gettok()
394 			cx.x_val.v_num = c - '0';  in s_gettok()
398 			cx.x_val.v_num = c - '0';  in s_gettok()
404 			cx.x_token = T_NUM;  in s_gettok()
411 			cx.x_val.v_num = cx.x_val.v_num * 10 + c - '0';  in s_gettok()
416 			cx.x_token = T_NUM;  in s_gettok()
423 			cx.x_val.v_num = cx.x_val.v_num * 16 + c - '0';  in s_gettok()
426 			cx.x_val.v_num = cx.x_val.v_num * 16 + c - 'a' + 10;  in s_gettok()
429 			cx.x_val.v_num = cx.x_val.v_num * 16 + c - 'A' + 10;  in s_gettok()
434 			cx.x_token = T_NUM;  in s_gettok()
441 			cx.x_val.v_num = cx.x_val.v_num * 8 + c - '0';  in s_gettok()
446 			cx.x_token = T_NUM;  in s_gettok()
452 			cx.x_token = T_GE;  in s_gettok()
456 			cx.x_token = T_RS;  in s_gettok()
461 			cx.x_token = T_GT;  in s_gettok()
468 			cx.x_token = T_LE;  in s_gettok()
472 			cx.x_token = T_LS;  in s_gettok()
477 			cx.x_token = T_LT;  in s_gettok()
484 			cx.x_token = T_EQ;  in s_gettok()
489 			cx.x_token = T_ASSIGN;  in s_gettok()
496 			cx.x_token = T_NE;  in s_gettok()
501 			cx.x_token = T_NOT;  in s_gettok()
508 			cx.x_token = T_ANDAND;  in s_gettok()
513 			cx.x_token = T_AND;  in s_gettok()
520 			cx.x_token = T_OROR;  in s_gettok()
525 			cx.x_token = T_OR;  in s_gettok()
532 			cx.x_token = T_DQ;  in s_gettok()
537 			cx.x_token = T_DOLLAR;  in s_gettok()
546 	return cx.x_token;  in s_gettok()