aboutsummaryrefslogtreecommitdiff
path: root/tccpp.c
diff options
context:
space:
mode:
authorSteven G. Messervey <nuke48386@yahoo.com>2015-04-15 21:24:15 -0400
committerSteven G. Messervey <nuke48386@yahoo.com>2015-04-15 21:24:15 -0400
commite50d68e4175d9ffa2915d67100ee8f9c5faf8cf1 (patch)
treea014fedae73418d6ee070b05440ae2719db8d376 /tccpp.c
parent8615bb40fb39bf7435462ca54cbbc24aaecae502 (diff)
downloadtinycc-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.c38
1 files changed, 0 insertions, 38 deletions
diff --git a/tccpp.c b/tccpp.c
index 51353aa..111ea2b 100644
--- a/tccpp.c
+++ b/tccpp.c
@@ -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 */