diff options
| author | Steven G. Messervey <nuke48386@yahoo.com> | 2015-04-15 21:24:15 -0400 |
|---|---|---|
| committer | Steven G. Messervey <nuke48386@yahoo.com> | 2015-04-15 21:24:15 -0400 |
| commit | e50d68e4175d9ffa2915d67100ee8f9c5faf8cf1 (patch) | |
| tree | a014fedae73418d6ee070b05440ae2719db8d376 /tccpp.c | |
| parent | 8615bb40fb39bf7435462ca54cbbc24aaecae502 (diff) | |
| download | tinycc-e50d68e4175d9ffa2915d67100ee8f9c5faf8cf1.tar.gz tinycc-e50d68e4175d9ffa2915d67100ee8f9c5faf8cf1.tar.bz2 | |
Revert "implement #pragma comment(lib,...)"
This reverts commit 8615bb40fb39bf7435462ca54cbbc24aaecae502.
Reverting as it breaks on MinGW targets
Diffstat (limited to 'tccpp.c')
| -rw-r--r-- | tccpp.c | 38 |
1 files changed, 0 insertions, 38 deletions
@@ -1420,45 +1420,7 @@ static void pragma_parse(TCCState *s1) *s1->pack_stack_ptr = val; skip(')'); } - } else if (tok == TOK_comment) { - if (s1->ms_extensions) { - next(); - skip('('); - if (tok == TOK_lib) { - next(); - skip(','); - if (tok != TOK_STR) - tcc_error("invalid library specification"); - else { - /**/ - int len = strlen((char *)tokc.cstr->data); - char *file = tcc_malloc(len+4); /* filetype, "-l" and 0 at the end */ - file[0] = TCC_FILETYPE_BINARY; - file[1] = '-'; - file[2] = 'l'; - strcpy(&file[3], (char *)tokc.cstr->data); - dynarray_add((void ***)&s1->files, &s1->nb_files, file); - /**/ - /* we can't use - tcc_add_library(s1,(char *)tokc.cstr->data); - while compiling some file - */ - /* - if (strrchr((char *)tokc.cstr->data,'.') == NULL) - tcc_add_library(s1,(char *)tokc.cstr->data); - else - tcc_add_file(s1,(char *)tokc.cstr->data,TCC_FILETYPE_BINARY); - */ - } - next(); - tok = TOK_LINEFEED; - } - } - else - tcc_warning("#pragma comment(lib) is ignored"); } - else - tcc_warning("unknown #pragma %s", get_tok_str(tok, &tokc)); } /* is_bof is true if first non space token at beginning of file */ |
