16 |
char b[200];\ |
char b[200];\ |
17 |
\ |
\ |
18 |
if (snprintf(b,sizeof(b),"ar x %-*.*slibpcl_gcl.a %s.o",\ |
if (snprintf(b,sizeof(b),"ar x %-*.*slibpcl_gcl.a %s.o",\ |
19 |
sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
(int)sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
20 |
sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
(int)sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
21 |
sSAsystem_directoryA->s.s_dbind->st.st_self,#a)<=0)\ |
sSAsystem_directoryA->s.s_dbind->st.st_self,#a)<=0)\ |
22 |
error("Cannot unpack module " #a "o\n");\ |
error("Cannot unpack module " #a "o\n");\ |
23 |
if (system(b)) \ |
if (system(b)) \ |
47 |
char b[200];\ |
char b[200];\ |
48 |
\ |
\ |
49 |
if (snprintf(b,sizeof(b),"%-*.*s%s",\ |
if (snprintf(b,sizeof(b),"%-*.*s%s",\ |
50 |
sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
(int)sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
51 |
sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
(int)sSAsystem_directoryA->s.s_dbind->st.st_fillp,\ |
52 |
sSAsystem_directoryA->s.s_dbind->st.st_self,a)<=0)\ |
sSAsystem_directoryA->s.s_dbind->st.st_self,a)<=0)\ |
53 |
error("Cannot append system directory\n");\ |
error("Cannot append system directory\n");\ |
54 |
load1(b);\ |
load1(b);\ |