/[guile]/guile/guile-core/libguile/gc.c
ViewVC logotype

Diff of /guile/guile-core/libguile/gc.c

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

revision 1.226 by dirk, Fri Mar 1 00:19:20 2002 UTC revision 1.227 by ossau, Tue Mar 12 21:12:25 2002 UTC
# Line 2585  scm_gc_unregister_roots (SCM *b, unsigne Line 2585  scm_gc_unregister_roots (SCM *b, unsigne
2585      scm_gc_unregister_root (p);      scm_gc_unregister_root (p);
2586  }  }
2587    
2588  int terminating;  int scm_i_terminating;
2589    
2590  /* called on process termination.  */  /* called on process termination.  */
2591  #ifdef HAVE_ATEXIT  #ifdef HAVE_ATEXIT
# Line 2602  cleanup (int status, void *arg) Line 2602  cleanup (int status, void *arg)
2602  #endif  #endif
2603  #endif  #endif
2604  {  {
2605    terminating = 1;    scm_i_terminating = 1;
2606    scm_flush_all_ports ();    scm_flush_all_ports ();
2607  }  }
2608    

Legend:
Removed from v.1.226  
changed lines
  Added in v.1.227

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