fixed a bug in check_*_expr()

This commit is contained in:
erikb 1986-03-20 13:09:47 +00:00
parent 5c71bad6e1
commit 9f8f8c1a9c

View file

@ -390,9 +390,9 @@ check_integral_type(expp, oper)
if (!is_integral_type(expr->ex_type)) {
expr_error(expr, "%s on non-integral type (%s)",
symbol2str(oper), symbol2str(expr->ex_type->tp_fund));
}
erroneous2int(expp);
}
}
int
is_arith_type(tp)
@ -424,6 +424,6 @@ check_arith_type(expp, oper)
if (!is_arith_type(expr->ex_type)) {
expr_error(expr, "%s on non-arithmetical type (%s)",
symbol2str(oper), symbol2str(expr->ex_type->tp_fund));
}
erroneous2int(expp);
}
}