Mercurial > hg > octave-lyh

comparison src/toplev.cc @ 4214:b9317f3973ec

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-12-04 04:57:01 by jwe]
author jwe
date Wed, 04 Dec 2002 04:57:01 +0000
parents e96f52432059
children 301cc4cf87e9
comparison
equal deleted inserted replaced
4213:f8f7fc582c62 4214:b9317f3973ec
572 572
573 DEFALIAS (shell_cmd, system); 573 DEFALIAS (shell_cmd, system);
574 574
575 // XXX FIXME XXX -- this should really be static, but that causes 575 // XXX FIXME XXX -- this should really be static, but that causes
576 // problems on some systems. 576 // problems on some systems.
577 SLStack<std::string> octave_atexit_functions; 577 std::stack<std::string> octave_atexit_functions;
578 578
579 void 579 void
580 do_octave_atexit (void) 580 do_octave_atexit (void)
581 { 581 {
582 static bool deja_vu = false; 582 static bool deja_vu = false;
583 583
584 while (! octave_atexit_functions.empty ()) 584 while (! octave_atexit_functions.empty ())
585 { 585 {
586 octave_value_list fcn = octave_atexit_functions.pop (); 586 octave_value_list fcn = octave_atexit_functions.top ();
587
588 octave_atexit_functions.pop ();
587 589
588 feval (fcn, 0); 590 feval (fcn, 0);
589 591
590 flush_octave_stdout (); 592 flush_octave_stdout ();
591 } 593 }