/* initinputs - if LCCINPUTS or include is defined, use them to initialize various lists */
static void initinputs(void) {
char *s = getenv("LCCINPUTS");
List list, b;
if (s == 0 && (s = inputs)[0] == 0)
s = ".";
if (s) {
lccinputs = path2list(s);
if (b = lccinputs)
do {
b = b->link;
if (strcmp(b->str, ".") != 0) {
ilist = append(concat("-I", b->str), ilist);
if (strstr(com[1], "win32") == NULL)
llist[0] = append(concat("-L", b->str), llist[0]);
} else
b->str = "";
} while (b != lccinputs);
}
#ifdef WIN32
if (list = b = path2list(getenv("include")))
do {
int n;
b = b->link;
n = strlen(b->str);
if (b->str[n-1] == '\\')
b->str[n-1] = '/';
ilist = append(stringf("-I\"%s\"", b->str), ilist);
} while (b != list);
#endif
}
/* initinputs - if LCCINPUTS or include is defined, use them to initialize various lists */
static void initinputs(void) {
char *s = getenv("LCCINPUTS");
List b;
if (s == 0 || (s = inputs)[0] == 0)
s = ".";
if (s) {
lccinputs = path2list(s);
if ((b = lccinputs))
do {
b = b->link;
if (strcmp(b->str, ".") != 0) {
ilist = append(concat("-I", b->str), ilist);
if (strstr(com[1], "win32") == NULL)
llist[0] = append(concat("-L", b->str), llist[0]);
} else
b->str = "";
} while (b != lccinputs);
}
}
