From 347197573bbbfbeab69b1c27a55af7e346031361 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Tue, 11 Jul 1989 12:48:40 +0000
Subject: [PATCH] made to compile, added proper cast

---
 lang/m2/libm2/halt.c   | 1 -
 lang/m2/libm2/sigtrp.c | 2 +-
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/lang/m2/libm2/halt.c b/lang/m2/libm2/halt.c
index 1b504f904..7b6508a36 100644
--- a/lang/m2/libm2/halt.c
+++ b/lang/m2/libm2/halt.c
@@ -17,7 +17,6 @@ _cleanup()
 {
 	while (--callindex >= 0)
 		(*proclist[callindex])();
-	}
 	callindex = 0;
 }
 
diff --git a/lang/m2/libm2/sigtrp.c b/lang/m2/libm2/sigtrp.c
index 80a310947..59a600667 100644
--- a/lang/m2/libm2/sigtrp.c
+++ b/lang/m2/libm2/sigtrp.c
@@ -70,7 +70,7 @@ sigtrp(trapno, signo)
 
 	oldtrap = __traps[signo];
 
-	if (signal(signo, ctch) == -1)		/* errno set by signal */
+	if (signal(signo, ctch) == (int (*)())-1)  /* errno set by signal */
 		return -1;
 	
 	__traps[signo] = trapno;
-- 
2.34.1