From 6218df129332bdd72152c4759f2f69f4bf33afb3 Mon Sep 17 00:00:00 2001 From: ceriel Date: Wed, 15 Mar 1989 10:46:27 +0000 Subject: [PATCH] improved error message for no RETURN from function procedure --- lang/m2/libm2/catch.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lang/m2/libm2/catch.c b/lang/m2/libm2/catch.c index 3d3529f5e..909b3f7e3 100644 --- a/lang/m2/libm2/catch.c +++ b/lang/m2/libm2/catch.c @@ -43,7 +43,7 @@ static struct errm { { M2_TOOLARGE, "stack size of process too large"}, { M2_TOOMANY, "too many nested traps + handlers"}, - { M2_NORESULT, "no RETURN from procedure function"}, + { M2_NORESULT, "no RETURN from function procedure"}, { M2_UOVFL, "cardinal overflow"}, { M2_FORCH, "(warning) FOR-loop control variable was changed in the body"}, { M2_UUVFL, "cardinal underflow"},