github-repos/tinycc
1
0
Fork 0
mirror of https://github.com/mirror/tinycc.git synced 2025-01-27 06:10:06 +08:00
Code Issues Packages Projects Releases Wiki Activity

tccgen: Detect (but ignore) function redirection

Browse Source 
tcc is now able to parse <stdio.h> from gcc, when
__GNUC__ is also defined

--
By by ... Detlef
This commit is contained in:
Detlef Riekenberg 2010-04-06 00:33:15 +02:00
parent 34dabe496f
commit 264a103610
1 changed files with 30 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
tccgen.c
View File

@ -5419,10 +5419,39 @@ ST_FUNC void decl(int l)
sym = sym_push(v, &type, INT_ATTR(&ad), 0);
sym->type.t |= VT_TYPEDEF;
} else if ((type.t & VT_BTYPE) == VT_FUNC) {
Sym *fn;
/* external function definition */
/* specific case for func_call attribute */
type.ref->r = INT_ATTR(&ad);
external_sym(v, &type, 0);
fn = external_sym(v, &type, 0);
if (gnu_ext && (tok == TOK_ASM1 || tok == TOK_ASM2 || tok == TOK_ASM3)) {
char target[256];
*target = 0;
next();
skip('(');
/* Part 1: __USER_LABEL_PREFIX__ (user defined) */
if (tok == TOK_STR)
pstrcat(target, sizeof(target), tokc.cstr->data);
else
pstrcat(target, sizeof(target), get_tok_str(tok, NULL));
next();
/* Part 2: api name */
if (tok == TOK_STR)
pstrcat(target, sizeof(target), tokc.cstr->data);
else
pstrcat(target, sizeof(target), get_tok_str(tok, NULL));
next();
skip(')');
if (tcc_state->warn_unsupported)
warning("ignoring redirection from %s to %s\n", get_tok_str(v, NULL), target);
if (tok == TOK_ATTRIBUTE1 || tok == TOK_ATTRIBUTE2)
parse_attribute((AttributeDef *) &fn->type.ref->r);
}
} else {
/* not lvalue if array */
r = 0;