Mercurial > octave-nkf
comparison src/toplev.cc @ 6620:bf4bdc21dc8d
[project @ 2007-05-14 17:35:46 by jwe]
author | jwe |
---|---|
date | Mon, 14 May 2007 17:38:38 +0000 |
parents | 687ae48b2253 |
children | 43fdc8e8ed28 |
comparison
equal
deleted
inserted
replaced
6619:b2b3b0509586 | 6620:bf4bdc21dc8d |
---|---|
663 @deftypefn {Built-in Function} {} atexit (@var{fcn})\n\ | 663 @deftypefn {Built-in Function} {} atexit (@var{fcn})\n\ |
664 Register a function to be called when Octave exits. For example,\n\ | 664 Register a function to be called when Octave exits. For example,\n\ |
665 \n\ | 665 \n\ |
666 @example\n\ | 666 @example\n\ |
667 @group\n\ | 667 @group\n\ |
668 function print_fortune ()\n\ | 668 function bye_bye ()\n\ |
669 printf (\"\\n%s\\n\", system (\"fortune\"));\n\ | 669 disp (\"Bye bye\");\n\ |
670 fflush (stdout);\n\ | |
671 endfunction\n\ | 670 endfunction\n\ |
672 atexit (\"print_fortune\");\n\ | 671 atexit (\"bye_bye\");\n\ |
673 @end group\n\ | 672 @end group\n\ |
674 @end example\n\ | 673 @end example\n\ |
675 \n\ | 674 \n\ |
676 @noindent\n\ | 675 @noindent\n\ |
677 will print a message when Octave exits.\n\ | 676 will print the message \"Bye bye\" when Octave exits.\n\ |
678 @end deftypefn") | 677 @end deftypefn") |
679 { | 678 { |
680 octave_value_list retval; | 679 octave_value_list retval; |
681 | 680 |
682 int nargin = args.length (); | 681 int nargin = args.length (); |