enhanced awk to detected divide-by-zero error when folding constans

This commit is contained in:
2015-11-20 03:12:07 +00:00
parent 028646bb54
commit 1d99026dbc
2 changed files with 21 additions and 3 deletions

View File

@ -3364,6 +3364,12 @@ static int fold_constants_for_binop (
break;
case QSE_AWK_BINOP_DIV:
if (((qse_awk_nde_int_t*)right)->val == 0)
{
qse_awk_seterrnum (awk, QSE_AWK_EDIVBY0, QSE_NULL);
return QSE_NULL;
}
if (INT_BINOP_INT(left,%,right))
{
folded->r = (qse_awk_flt_t)((qse_awk_nde_int_t*)left)->val /
@ -3371,8 +3377,17 @@ static int fold_constants_for_binop (
fold = QSE_AWK_NDE_FLT;
break;
}
/* fall through here */
folded->l = INT_BINOP_INT(left,/,right);
break;
case QSE_AWK_BINOP_IDIV:
if (((qse_awk_nde_int_t*)right)->val == 0)
{
qse_awk_seterrnum (awk, QSE_AWK_EDIVBY0, QSE_NULL);
return QSE_NULL;
}
folded->l = INT_BINOP_INT(left,/,right);
break;