godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Delinted a bit

Browse Source
This commit is contained in:
ceriel
1991-04-25 16:47:47 +00:00
parent 831b8ab578
commit fa89b0f280
4 changed files with 9 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lang/m2/comp/chk_expr.c
View File

@@ -86,6 +86,7 @@ MkCoercion(pnd, tp)
break;
default:
crash("MkCoercion");
/*NOTREACHED*/
}
if (flt_status == FLT_OVFL) {
wmess = "conversion";
@@ -912,7 +913,8 @@ ChkBinOper(expp)
/* First, check BOTH operands */
retval = ChkExpression(&(exp->nd_LEFT)) & ChkExpression(&(exp->nd_RIGHT));
retval = ChkExpression(&(exp->nd_LEFT));
retval &= ChkExpression(&(exp->nd_RIGHT));
tpl = BaseType(exp->nd_LEFT->nd_type);
tpr = BaseType(exp->nd_RIGHT->nd_type);