/[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.208.2.6 by dirk, Fri Mar 1 21:12:47 2002 UTC revision 1.208.2.7 by ossau, Tue Mar 12 20:58:23 2002 UTC
# Line 2684  scm_gc_unregister_roots (SCM *b, unsigne Line 2684  scm_gc_unregister_roots (SCM *b, unsigne
2684      scm_gc_unregister_root (p);      scm_gc_unregister_root (p);
2685  }  }
2686    
2687  int terminating;  int scm_i_terminating;
2688    
2689  /* called on process termination.  */  /* called on process termination.  */
2690  #ifdef HAVE_ATEXIT  #ifdef HAVE_ATEXIT
# Line 2701  cleanup (int status, void *arg) Line 2701  cleanup (int status, void *arg)
2701  #endif  #endif
2702  #endif  #endif
2703  {  {
2704    terminating = 1;    scm_i_terminating = 1;
2705    scm_flush_all_ports ();    scm_flush_all_ports ();
2706  }  }
2707    

Legend:
Removed from v.1.208.2.6  
changed lines
  Added in v.1.208.2.7

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