view test/test_if.m @ 6658:db6d908e8a03 ss-2-9-12

[project @ 2007-05-23 04:38:07 by jwe]
author jwe
date Wed, 23 May 2007 04:38:08 +0000
parents 1ad66ea35fe5
children 93c65f2a5668
line wrap: on
line source

%% Automatically generated from DejaGNU files

%% test/octave.test/if/if-1.m
%!test
%! i = 0;
%! if (i == 0)
%! i++;
%! printf_assert ("%d\n", i);
%! endif
%! assert(prog_output_assert("1"));

%% test/octave.test/if/if-2.m
%!test
%! if (eye (2))
%! printf_assert ("fail\n");
%! else
%! printf_assert ("pass\n");
%! end
%! assert(prog_output_assert("pass"));

%% test/octave.test/if/if-3.m
%!test
%! x = 2;
%! if (eye (2))
%! printf_assert ("fail\n");
%! elseif (x)
%! printf_assert ("pass\n");
%! endif
%! assert(prog_output_assert("pass"));

%% test/octave.test/if/if-4.m
%!test
%! x = 0;
%! y = -2;
%! if (eye (2))
%! printf_assert ("fail\n");
%! elseif (x)
%! printf_assert ("fail\n");
%! elseif (y)
%! printf_assert ("pass\n");
%! end
%! assert(prog_output_assert("pass"));

%% test/octave.test/if/if-5.m
%!test
%! x = 0;
%! y = -2;
%! if (eye (2))
%! printf_assert ("fail\n");
%! elseif (x)
%! printf_assert ("fail\n");
%! elseif (x)
%! printf_assert ("fail\n");
%! else
%! printf_assert ("pass\n");
%! endif
%! assert(prog_output_assert("pass"));

%% test/octave.test/if/if-6.m
%!test
%! x = 0;
%! y = -2;
%! if (y)
%! printf_assert ("pass\n");
%! elseif (x)
%! printf_assert ("fail\n");
%! elseif (x)
%! printf_assert ("fail\n");
%! end
%! assert(prog_output_assert("pass"));