int n;
int i;
OrcProgram **programs;
- const char *filename = "test.orc";
+ const char *filename = NULL;
orc_init ();
orc_test_init ();
if (argc >= 2) {
filename = argv[1];
}
+ if (filename == NULL) {
+ filename = getenv ("testfile");
+ }
+ if (filename == NULL) {
+ filename = "test.orc";
+ }
code = read_file (filename);
if (!code) {
printf("compile_parse_test <file.orc>\n");
int n;
int i;
OrcProgram **programs;
- const char *filename = "test.orc";
+ const char *filename = NULL;
orc_init ();
orc_test_init ();
if (argc >= 2) {
filename = argv[1];
}
+ if (filename == NULL) {
+ filename = getenv ("testfile");
+ }
+ if (filename == NULL) {
+ filename = "test.orc";
+ }
code = read_file (filename);
if (!code) {
printf("compile_parse_test <file.orc>\n");