--- mintlib/startup/crt0.S	Thu Sep 27 17:31:38 2001
+++ mintlib.new/startup/crt0.S	Wed Jan  9 22:38:44 2008
@@ -63,8 +63,10 @@
 __startprg:
 	movel	sp@(4), a0	| get basepage
 	movel	a0, Base	| save it
-	movel	a0@(4), d0	| get _base->p_hitpa
-	bclr	#0, d0		| round off
+	movel	a0@(0x18), d0	| get address of BSS segment
+	addl	a0@(0x1c), d0	| add length of BSS segment
+	addl	#1024, d0	| add length of early stack
+	andb	#0b11111100, d0	| align on long boundary
 	movel	d0, sp		| set stack (temporarily)
 	jmp	__crtinit	| in crtinit.c