From 0c7f0ed312d51afe2e1e2a736d41bcc257e15e38 Mon Sep 17 00:00:00 2001 From: bellard Date: Wed, 15 Jun 2005 22:32:10 +0000 Subject: added -f[no-]leading-underscore --- tccpe.c | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) (limited to 'tccpe.c') diff --git a/tccpe.c b/tccpe.c index 5911296..f1bd0f7 100644 --- a/tccpe.c +++ b/tccpe.c @@ -383,13 +383,10 @@ ST char pe_type; ST int pe_find_import(TCCState * s1, const char *symbol, char *ret) { int sym_index = find_elf_sym(s1->dynsymtab_section, symbol); - if (0 == sym_index) { - /* Hm, maybe it's '_symbol' instead of 'symbol' or '__imp__symbol' */ - char buffer[100]; - if (0 == memcmp(symbol, "__imp__", 7)) - symbol += 6; - else - buffer[0] = '_', strcpy(buffer + 1, symbol), symbol = buffer; + if (0 == sym_index && + !memcmp(symbol, "__imp__", 7)) { + /* Hm, maybe it's '_symbol' instead of '__imp__symbol' */ + symbol += 6; sym_index = find_elf_sym(s1->dynsymtab_section, symbol); } if (ret) -- cgit v1.3.1