Mercurial > hg > octave-lyh

comparison scripts/testfun/fail.m @ 8507:cadc73247d65

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style fixes
author John W. Eaton <jwe@octave.org>
date Tue, 13 Jan 2009 14:08:36 -0500
parents bc982528de11
children 5dd06f19e9be
comparison
equal deleted inserted replaced
8506:bc982528de11 8507:cadc73247d65
58 58
59 ## sort out arguments 59 ## sort out arguments
60 test_warning = (nargin > 1 && strcmp (pattern, "warning")); 60 test_warning = (nargin > 1 && strcmp (pattern, "warning"));
61 if (nargin == 3) 61 if (nargin == 3)
62 pattern = warning_pattern; 62 pattern = warning_pattern;
63 elseif (nargin == 1 || (nargin==2 && test_warning)) 63 elseif (nargin == 1 || (nargin == 2 && test_warning))
64 pattern = ""; 64 pattern = "";
65 endif 65 endif
66 66
67 ## match any nonempty message 67 ## match any nonempty message
68 if (isempty (pattern)) 68 if (isempty (pattern))