/[gcl]/gcl/o/sfaslmacosx.c
ViewVC logotype

Diff of /gcl/o/sfaslmacosx.c

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

revision 1.2 by camm, Thu Sep 4 15:13:35 2003 UTC revision 1.3 by rlbk, Thu Sep 4 21:46:34 2003 UTC
# Line 215  int fasload (object faslfile) Line 215  int fasload (object faslfile)
215            
216      char cmd [256];      char cmd [256];
217            
218        static int count = 0;
219        
220        if (count == 0) count = time (0);
221        
222      coerce_to_filename (truename (faslfile), filename);      coerce_to_filename (truename (faslfile), filename);
223            
224      snprintf (tmpfile, sizeof(tmpfile), "/tmp/fasload%lx.so", time(0));      snprintf (tmpfile, sizeof(tmpfile), "/tmp/ufas%dx.so", count++);
225    
226      mkstemp (tmpfile);      mkstemp (tmpfile);
227      symlink (filename, tmpfile);      symlink (filename, tmpfile);

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

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