Mercurial > hg > octave-lyh

comparison src/pt-eval.cc @ 14429:eff4a5933e28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update %!tests in src/ directory with Octave coding conventions. * data.cc, defaults.cc, dirfns.cc, file-io.cc, graphics.cc, mappers.cc, oct-map.cc, octave.cc, ov-base.cc, ov-bool-mat.cc, ov-cell.cc, ov-fcn-handle.cc, ov-fcn-inline.cc, ov-flt-re-mat.cc, ov-int16.cc, ov-int32.cc, ov-int64.cc, ov-int8.cc, ov-null-mat.cc, ov-oncleanup.cc, ov-range.cc, ov-re-mat.cc, ov-struct.cc, ov-typeinfo.cc, ov-uint16.cc, ov-uint32.cc, ov-uint64.cc, ov-uint8.cc, ov.cc, pr-output.cc, pt-binop.cc, pt-eval.cc, pt-idx.cc, pt-mat.cc, sighandlers.cc, strfns.cc, symtab.cc, syscalls.cc, sysdep.cc, toplev.cc, utils.cc, variables.cc: Update %!tests in src/ directory with Octave coding conventions.
author Rik <octave@nomad.inbox5.com>
date Sun, 04 Mar 2012 12:21:10 -0800
parents 9e3983c8963c
children f25d2224fa02
comparison
equal deleted inserted replaced
14428:099bd779466c 14429:eff4a5933e28
1205 { 1205 {
1206 return SET_INTERNAL_VARIABLE (max_recursion_depth); 1206 return SET_INTERNAL_VARIABLE (max_recursion_depth);
1207 } 1207 }
1208 1208
1209 /* 1209 /*
1210 %!error (max_recursion_depth (1, 2));
1211 %!test 1210 %!test
1212 %! orig_val = max_recursion_depth (); 1211 %! orig_val = max_recursion_depth ();
1213 %! old_val = max_recursion_depth (2*orig_val); 1212 %! old_val = max_recursion_depth (2*orig_val);
1214 %! assert (orig_val, old_val); 1213 %! assert (orig_val, old_val);
1215 %! assert (max_recursion_depth (), 2*orig_val); 1214 %! assert (max_recursion_depth (), 2*orig_val);
1216 %! max_recursion_depth (orig_val); 1215 %! max_recursion_depth (orig_val);
1217 %! assert (max_recursion_depth (), orig_val); 1216 %! assert (max_recursion_depth (), orig_val);
1217
1218 %!error (max_recursion_depth (1, 2))
1218 */ 1219 */
1219 1220
1220 DEFUN (silent_functions, args, nargout, 1221 DEFUN (silent_functions, args, nargout,
1221 "-*- texinfo -*-\n\ 1222 "-*- texinfo -*-\n\
1222 @deftypefn {Built-in Function} {@var{val} =} silent_functions ()\n\ 1223 @deftypefn {Built-in Function} {@var{val} =} silent_functions ()\n\
1234 { 1235 {
1235 return SET_INTERNAL_VARIABLE (silent_functions); 1236 return SET_INTERNAL_VARIABLE (silent_functions);
1236 } 1237 }
1237 1238
1238 /* 1239 /*
1239 %!error (silent_functions (1, 2));
1240 %!test 1240 %!test
1241 %! orig_val = silent_functions (); 1241 %! orig_val = silent_functions ();
1242 %! old_val = silent_functions (! orig_val); 1242 %! old_val = silent_functions (! orig_val);
1243 %! assert (orig_val, old_val); 1243 %! assert (orig_val, old_val);
1244 %! assert (silent_functions (), ! orig_val); 1244 %! assert (silent_functions (), ! orig_val);
1245 %! silent_functions (orig_val); 1245 %! silent_functions (orig_val);
1246 %! assert (silent_functions (), orig_val); 1246 %! assert (silent_functions (), orig_val);
1247
1248 %!error (silent_functions (1, 2))
1247 */ 1249 */