/[gcl]/gcl/unixport/sys_gcl.c
ViewVC logotype

Diff of /gcl/unixport/sys_gcl.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13.6.2.10.1 by camm, Fri May 6 21:56:57 2005 UTC revision 1.13.6.2.10.2 by camm, Sat May 7 14:40:33 2005 UTC
# Line 22  void gcl_init_or_load1 (void (*)(void),c Line 22  void gcl_init_or_load1 (void (*)(void),c
22      error("Cannot unpack module " #a "o\n");\      error("Cannot unpack module " #a "o\n");\
23    if (system(b)) \    if (system(b)) \
24      error("Cannot run ar command to unpack module " #a ".o\n");\      error("Cannot run ar command to unpack module " #a ".o\n");\
25    init_or_load(Mjoin(init_,Mjoin(a,_o)),#a ".o");\    init_or_load(Mjoin(init_,a),#a ".o");\
26    if (unlink(#a ".o"))\    if (unlink(#a ".o"))\
27      error("Cannot unlink " #a ".o\n");\      error("Cannot unlink " #a ".o\n");\
28  } while(0)  } while(0)

Legend:
Removed from v.1.13.6.2.10.1  
changed lines
  Added in v.1.13.6.2.10.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26