Falk Hueffner <[EMAIL PROTECTED]> writes:
> Maybe like this:
Actually, what I really want is:
--- ocaml-3.09.0.orig/asmcomp/alpha/emit.mlp 2005-10-14 18:41:06.000000000 +0
200
+++ ocaml-3.09.0/asmcomp/alpha/emit.mlp 2005-12-10 20:50:11.000000000 +0100
@@ -740,7 +740,7 @@
` .fmask 0x0, 0\n`
end;
` .frame $sp, {emit_int n}, $26\n`;
- ` .prologue {emit_int(if needs_gp then 1 else 0)}\n`;
+ ` .prologue {emit_int(if !contains_calls || needs_gp then 1 else 0)}\n`;
tailrec_entry_point := new_label();
`{emit_label !tailrec_entry_point}:\n`;
emit_all true fundecl.fun_body;
which gives .prologue 1 for caml_apply2. However, ocaml still
segfaults when bootstrapping without --no-relax...
--
Falk
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
