3749 |
next token. XXX: find better solution */ |
next token. XXX: find better solution */ |
3750 |
if (macro_ptr) { |
if (macro_ptr) { |
3751 |
t = *macro_ptr; |
t = *macro_ptr; |
3752 |
|
if (t == 0) { |
3753 |
|
/* end of macro stream: we must look at the token |
3754 |
|
after in the file */ |
3755 |
|
macro_ptr = NULL; |
3756 |
|
goto parse_stream; |
3757 |
|
} |
3758 |
} else { |
} else { |
3759 |
|
parse_stream: |
3760 |
/* XXX: incorrect with comments */ |
/* XXX: incorrect with comments */ |
3761 |
ch = file->buf_ptr[0]; |
ch = file->buf_ptr[0]; |
3762 |
while (is_space(ch) || ch == '\n') |
while (is_space(ch) || ch == '\n') |
3988 |
if (macro_str1) |
if (macro_str1) |
3989 |
ptr = macro_str1; |
ptr = macro_str1; |
3990 |
while (1) { |
while (1) { |
3991 |
|
/* NOTE: ptr == NULL can only happen if tokens are read from |
3992 |
|
file stream due to a macro function call */ |
3993 |
|
if (ptr == NULL) |
3994 |
|
break; |
3995 |
TOK_GET(t, ptr, cval); |
TOK_GET(t, ptr, cval); |
3996 |
if (t == 0) |
if (t == 0) |
3997 |
break; |
break; |