better attempt to indicate start and end of own BSS; still not good

enough

diff --git a/lang/m2/libm2/head_m2.e b/lang/m2/libm2/head_m2.e
index d56cb62..e6ef00b 100644 (file)
--- 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 43b3250..89e70da 100644 (file)
--- 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;
 }