17 lines
431 B
HolyC
Executable File
17 lines
431 B
HolyC
Executable File
U0 MyRead(U8 *filename)
|
|
{
|
|
CCmpCtrl *cc=CmpCtrlNew(MStrPrint("#include \"%s\"",filename));
|
|
while (Lex(cc)) {
|
|
"%03d:",cc->token;
|
|
switch (cc->token) {
|
|
case TK_IDENT: "IDENT:%s",cc->cur_str; break;
|
|
case TK_STR: "STR:%s",cc->cur_str; break;
|
|
case TK_CHAR_CONST: "CHAR:%d",cc->cur_i64; break;
|
|
case TK_I64: "I64:%d",cc->cur_i64; break;
|
|
case TK_F64: "F64:%d",cc->cur_f64; break;
|
|
}
|
|
'\n';
|
|
}
|
|
CmpCtrlDel(cc);
|
|
}
|