Skip to content
Snippets Groups Projects
Commit a0560bda authored by Adam Knapp's avatar Adam Knapp
Browse files

Not_a_number related bugfix (issue #622)


Signed-off-by: default avatarAdam Knapp <adam.knapp@ericsson.com>
parent 0ba05ffe
No related branches found
No related tags found
1 merge request!272Not_a_number related bugfix (issue #622)
......@@ -7610,6 +7610,16 @@ void Value::chk_expr_operand_execute_refd(Value *v1,
return;
}
chk_expr_operandtype_int_float(tt1, the, opname, v1);
if (tt1 == Type::T_REAL) {
if (v1->get_val_Real() != v1->get_val_Real()) {
if (u.expr.v_optype == OPTYPE_UNARYPLUS) {
v1->error("`+not_a_number' is not allowed");
} else {
v1->error("`-not_a_number' is not allowed");
}
set_valuetype(V_ERROR);
}
}
chk_expr_eval_value(v1, t_chk, refch, exp_val);
}
break;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment