Mercurial > octave-nkf

comparison libinterp/corefcn/sysdep.cc @ 19890:5c1a38089f89

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change open_with_system_app to internal function. * sysdep.cc (Fopen_with_system_app): Rename function to __open_with_system_app__. * open.m: Rename instance to __open_with_system_app__.
author Rik <rik@octave.org>
date Tue, 24 Feb 2015 21:22:28 -0800
parents 1c9ed5b4c73d
children bf511802add7
comparison
equal deleted inserted replaced
19889:a59c5a16c9ab 19890:5c1a38089f89
183 w32_shell_execute (const std::string& file) 183 w32_shell_execute (const std::string& file)
184 { 184 {
185 } 185 }
186 #endif 186 #endif
187 187
188 DEFUN (open_with_system_app, args, , 188 DEFUN (__open_with_system_app__, args, ,
189 "-*- texinfo -*-\n\ 189 "-*- texinfo -*-\n\
190 @deftypefn {Loadable Function} {} __w32_shell_execute__ (@var{file})\n\ 190 @deftypefn {Loadable Function} {} __open_with_system_app__ (@var{file})\n\
191 Undocumented internal function.\n\ 191 Undocumented internal function.\n\
192 @end deftypefn") 192 @end deftypefn")
193 { 193 {
194 octave_value retval; 194 octave_value retval;
195 195
213 213
214 retval = (tmp(0).double_value () == 0); 214 retval = (tmp(0).double_value () == 0);
215 #endif 215 #endif
216 } 216 }
217 else 217 else
218 error ("open_with_system_app: expecting argument to be a file name"); 218 error ("__open_with_system_app__: argument must be a file name");
219 } 219 }
220 else 220 else
221 print_usage (); 221 print_usage ();
222 222
223 return retval; 223 return retval;