diff --git a/lang/m2/comp/cstoper.c b/lang/m2/comp/cstoper.c
index 2d152374..62987f02 100644
--- a/lang/m2/comp/cstoper.c
+++ b/lang/m2/comp/cstoper.c
@@ -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;
diff --git a/lang/m2/comp/walk.c b/lang/m2/comp/walk.c
index 792eb55a..e9cec076 100644
--- a/lang/m2/comp/walk.c
+++ b/lang/m2/comp/walk.c
@@ -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);