From 85273af28155e9b6a12340f65614e9a922b2e157 Mon Sep 17 00:00:00 2001
From: pvalchev <pvalchev@openbsd.org>
Date: Wed, 11 Sep 2002 04:41:40 +0000
Subject: [PATCH] .section .rodata rather than .rdata on alpha; suggested by
 art@

---
 lang/ocaml/patches/patch-asmcomp_alpha_emit_mlp | 14 ++++++++++++++
 lang/ocaml/patches/patch-asmrun_alpha_S         | 12 ++++++++++++
 2 files changed, 26 insertions(+)
 create mode 100644 lang/ocaml/patches/patch-asmcomp_alpha_emit_mlp
 create mode 100644 lang/ocaml/patches/patch-asmrun_alpha_S

diff --git a/lang/ocaml/patches/patch-asmcomp_alpha_emit_mlp b/lang/ocaml/patches/patch-asmcomp_alpha_emit_mlp
new file mode 100644
index 00000000000..efdcc789a2c
--- /dev/null
+++ b/lang/ocaml/patches/patch-asmcomp_alpha_emit_mlp
@@ -0,0 +1,14 @@
+$OpenBSD: patch-asmcomp_alpha_emit_mlp,v 1.1 2002/09/11 04:41:40 pvalchev Exp $
+--- asmcomp/alpha/emit.mlp.orig	Tue Sep 10 21:01:03 2002
++++ asmcomp/alpha/emit.mlp	Tue Sep 10 21:01:08 2002
+@@ -280,8 +280,8 @@ let emit_call_gc gc =
+ 
+ let rdata_section =
+   match Config.system with
+-    "digital" | "openbsd" -> ".rdata"
+-  | "linux" | "netbsd" | "freebsd" -> ".section .rodata"
++    "digital" -> ".rdata"
++  | "linux" | "openbsd" | "netbsd" | "freebsd" -> ".section .rodata"
+   | _ -> assert false
+ 
+ (* Names of various instructions *)
diff --git a/lang/ocaml/patches/patch-asmrun_alpha_S b/lang/ocaml/patches/patch-asmrun_alpha_S
new file mode 100644
index 00000000000..6d5ba1313a7
--- /dev/null
+++ b/lang/ocaml/patches/patch-asmrun_alpha_S
@@ -0,0 +1,12 @@
+$OpenBSD: patch-asmrun_alpha_S,v 1.1 2002/09/11 04:41:40 pvalchev Exp $
+--- asmrun/alpha.S.orig	Tue Sep 10 21:01:35 2002
++++ asmrun/alpha.S	Tue Sep 10 21:01:53 2002
+@@ -426,7 +426,7 @@ $111:   ldgp    $gp, 0($27)
+         br      caml_c_call             /* never returns */
+         .end    caml_array_bound_error
+ 
+-#if defined(SYS_digital) || defined(SYS_openbsd)
++#if defined(SYS_digital)
+         .rdata
+ #else
+         .section .rodata