d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

fix typo and parameters of overflow

Browse source
This commit is contained in:
ceriel 1988-03-08 10:35:53 +00:00
parent 5cf3fc1017
commit 78926a5a84
2 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lang/m2/comp/cstoper.c
View file

@ -295,10 +295,10 @@ cstubin(expp)
if (expp->nd_type->tp_fund == T_INTORCARD) {
expp->nd_type = int_type;
if (! chk_bounds(min_int[sz], o1 - o2, T_CARDINAL)) {
overflow();
overflow(expp);
}
}
else overflow();
else overflow(expp);
}
o1 -= o2;
break;

2
lang/m2/comp/walk.c
View file

@ -230,7 +230,7 @@ WalkProcedure(procedure)
DoFilename(procedure->prc_body);
TmpOpen(procscope);
func_type = tp = RemoveEqual(RresultType(procedure->df_type));
func_type = tp = RemoveEqual(ResultType(procedure->df_type));
if (tp) {
func_res_size = WA(tp->tp_size);