From 3030b5edd1663861a96566b68c4166a8a27dd45c Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Tue, 4 Apr 1989 10:09:27 +0000
Subject: [PATCH] better attempt to indicate start and end of own BSS; still
 not good enough

---
 lang/m2/libm2/head_m2.e | 4 ++++
 lang/m2/libm2/init.c    | 4 ++--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/lang/m2/libm2/head_m2.e b/lang/m2/libm2/head_m2.e
index d56cb62ab..e6ef00b59 100644
--- a/lang/m2/libm2/head_m2.e
+++ b/lang/m2/libm2/head_m2.e
@@ -16,10 +16,14 @@
  exa argv
  exa argc
  exa MainLB
+ exa bkillbss
  exp $catch
  exp $init
  inp $trap_handler
 
+bkillbss
+ bss EM_PSIZE,0,0
+
  exp $m_a_i_n
  pro $m_a_i_n, 0
 
diff --git a/lang/m2/libm2/init.c b/lang/m2/libm2/init.c
index 43b325092..89e70daff 100644
--- a/lang/m2/libm2/init.c
+++ b/lang/m2/libm2/init.c
@@ -45,8 +45,8 @@ static int blablabla;		/*	We cannot use end, because then also
 
 killbss()
 {
-	extern char *edata;
-	register char *p = (char *) &edata;
+	extern char *bkillbss;
+	register char *p = (char *) &bkillbss;
 
 	while (p < (char *) &blablabla) *p++ = 0x66;
 }
-- 
2.34.1