mode = PrintCaml;
} else if (streq(option, "print-jna")) {
mode = PrintJna;
+ } else if (streq(option, "jna-limit")) {
+ ++i;
+ if (i >= argc) {
+ fprintf(stderr, "error: "
+ "expected argument after '--jna-limit'\n");
+ argument_errors = true;
+ break;
+ }
+ jna_limit_output(argv[i]);
+ } else if (streq(option, "jna-libname")) {
+ ++i;
+ if (i >= argc) {
+ fprintf(stderr, "error: "
+ "expected argument after '--jna-libname'\n");
+ argument_errors = true;
+ break;
+ }
+ jna_set_libname(argv[i]);
} else if (streq(option, "time")) {
do_timing = true;
} else if (streq(option, "version")) {
if (print_file_name_file != NULL) {
print_file_name(print_file_name_file);
- return 0;
+ return EXIT_SUCCESS;
}
if (files == NULL) {
fprintf(stderr, "error: no input files specified\n");
if (argument_errors) {
usage(argv[0]);
- return 1;
+ return EXIT_FAILURE;
}
/* we do the lowering in ast2firm */
if (out == NULL) {
fprintf(stderr, "Couldn't open '%s' for writing: %s\n", outname,
strerror(errno));
- return 1;
+ return EXIT_FAILURE;
}
}
dump_ir_graph_file(out, irg);
fclose(out);
- exit(0);
+ exit(EXIT_SUCCESS);
}
if (mode == CompileExportIR) {
fclose(out);
ir_export(outname);
- exit(0);
+ exit(EXIT_SUCCESS);
}
gen_firm_finish(asm_out, filename, have_const_functions);
int err = system(commandline);
if (err != EXIT_SUCCESS) {
fprintf(stderr, "linker reported an error\n");
- exit(1);
+ exit(EXIT_FAILURE);
}
}
exit_types();
exit_tokens();
exit_symbol_table();
- return 0;
+ return EXIT_SUCCESS;
}