view test/test_if.m @ 6469:a848b846cb3a ss-2-9-10

[project @ 2007-03-27 18:42:11 by jwe]
author jwe
date Tue, 27 Mar 2007 18:42:11 +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"));