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

Diff of /gcl/unixport/sys_pcl_gcl.c

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

revision 1.9 by camm, Sat May 7 02:52:33 2005 UTC revision 1.10 by camm, Sat May 7 14:44:37 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.9  
changed lines
  Added in v.1.10

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