Mercurial > hg > octave-nkf

comparison src/sysdep.cc @ 3333:15cddaacbc2d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1999-11-03 19:53:59 by jwe]
author jwe
date Wed, 03 Nov 1999 19:54:52 +0000
parents 7c03933635c6
children f16c2ce14886
comparison
equal deleted inserted replaced
3332:7c03933635c6 3333:15cddaacbc2d
118 static void 118 static void
119 NeXT_init (void) 119 NeXT_init (void)
120 { 120 {
121 malloc_error (malloc_handler); 121 malloc_error (malloc_handler);
122 } 122 }
123 endif 123 #endif
124 124
125 #if defined (__EMX__) 125 #if defined (__EMX__)
126 OS2_init (void) 126 OS2_init (void)
127 { 127 {
128 _control87 ((EM_INVALID | EM_DENORMAL | EM_ZERODIVIDE | EM_OVERFLOW 128 _control87 ((EM_INVALID | EM_DENORMAL | EM_ZERODIVIDE | EM_OVERFLOW
322 DEFUN (clc, , , 322 DEFUN (clc, , ,
323 "-*- texinfo -*-\n\ 323 "-*- texinfo -*-\n\
324 @deftypefn {Built-in Function} {} clc ()\n\ 324 @deftypefn {Built-in Function} {} clc ()\n\
325 @deftypefnx {Built-in Function} {} home ()\n\ 325 @deftypefnx {Built-in Function} {} home ()\n\
326 Clear the terminal screen and move the cursor to the upper left corner.\n\ 326 Clear the terminal screen and move the cursor to the upper left corner.\n\
327 @end deftypefn\n\ 327 @end deftypefn")
328 ")
329 { 328 {
330 command_editor::clear_screen (); 329 command_editor::clear_screen ();
331 330
332 return octave_value_list (); 331 return octave_value_list ();
333 } 332 }