Mercurial > hg > octave-nkf

diff libinterp/parse-tree/pt-binop.cc @ 18130:701e91ea0fe6 gui-release

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
restore tests removed in changeset d76f790b4eec
author John W. Eaton <jwe@octave.org>
date Wed, 11 Dec 2013 23:35:49 -0500
parents d76f790b4eec
children 91cd85a75705
line wrap: on
line diff
--- a/libinterp/parse-tree/pt-binop.cc
+++ b/libinterp/parse-tree/pt-binop.cc
@@ -322,3 +322,16 @@
 
   return SET_INTERNAL_VARIABLE (do_braindead_shortcircuit_evaluation);
 }
+
+/*
+%!test
+%! x = 0;
+%! do_braindead_shortcircuit_evaluation (0);
+%! if (1 | (x = 1))
+%! endif
+%! assert (x, 1);
+%! do_braindead_shortcircuit_evaluation (1);
+%! if (1 | (x = 0))
+%! endif
+%! assert (x, 1);
+*/