Mercurial > hg > octave-nkf
diff src/pt-loop.cc @ 3965:edd758a7ca8d
[project @ 2002-06-28 19:00:56 by jwe]
| author | jwe |
|---|---|
| date | Fri, 28 Jun 2002 19:00:56 +0000 |
| parents | 55648fc616c8 |
| children | f6df65db67f9 |
line wrap: on
line diff
--- a/src/pt-loop.cc +++ b/src/pt-loop.cc @@ -120,9 +120,8 @@ void tree_while_command::eval_error (void) { - if (error_state > 0) - ::error ("evaluating while command near line %d, column %d", - line (), column ()); + ::error ("evaluating while command near line %d, column %d", + line (), column ()); } void @@ -174,9 +173,8 @@ void tree_do_until_command::eval_error (void) { - if (error_state > 0) - ::error ("evaluating do-until command near line %d, column %d", - line (), column ()); + ::error ("evaluating do-until command near line %d, column %d", + line (), column ()); } void @@ -399,9 +397,8 @@ void tree_simple_for_command::eval_error (void) { - if (error_state > 0) - ::error ("evaluating for command near line %d, column %d", - line (), column ()); + ::error ("evaluating for command near line %d, column %d", + line (), column ()); } void @@ -507,9 +504,8 @@ void tree_complex_for_command::eval_error (void) { - if (error_state > 0) - ::error ("evaluating for command near line %d, column %d", - line (), column ()); + ::error ("evaluating for command near line %d, column %d", + line (), column ()); } void