45 int main(
int argc,
char* argv[]) {
46 osl_scop_p scop = NULL;
48 FILE* input, *output, *autopragma;
49 char **input_files = NULL;
57 while (input_files[i]) {
60 options->
name = strdup(input_files[i]);
62 if (!strcmp(options->
name,
"stdin"))
65 input = fopen(options->
name,
"r");
68 fprintf(stderr,
"[Clan] Error: Unable to open input file %s\n",
73 printf(
"[Clan] Info: parsing file #%d (%s)\n", i+1, input_files[i]);
79 scop = osl_scop_read(input);
91 osl_scop_dump(stdout, scop);
100 if ((autopragma = fopen(CLAN_AUTOPRAGMA_FILE,
"r")) == NULL)
101 CLAN_error(
"cannot read the temporary file");
102 while ((c = fgetc(autopragma)) != EOF)
105 remove(CLAN_AUTOPRAGMA_FILE);
118 while (input_files[i]) {
119 free(input_files[i]);
void clan_scop_print(FILE *file, osl_scop_p scop, clan_options_p options)
osl_scop_p clan_scop_extract(FILE *input, clan_options_p options)
clan_options_p clan_options_read(int argv, char **argc, char ***input_files, FILE **output)
void clan_options_free(clan_options_p options)
void clan_scop_insert_pragmas(osl_scop_p scop, char *filename, int test)
int main(int argc, char *argv[])