summaryrefslogtreecommitdiff
path: root/asmcomp/proc_sparc.ml
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>1996-04-18 16:26:54 +0000
committerXavier Leroy <xavier.leroy@inria.fr>1996-04-18 16:26:54 +0000
commited86e5adfa3ec692d11954a627b5ea351fe006dd (patch)
treefd96f8580234112a721ca5fb31d095ba4799de7d /asmcomp/proc_sparc.ml
parentee1266885025393876a3c42857881cd75b50f562 (diff)
downloadocaml-ed86e5adfa3ec692d11954a627b5ea351fe006dd.tar.gz
*_sparc: Ajout de NetBSD pour Sparc.
Autres: ajout d'un flag -linkall dans les bibliotheques. git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@743 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'asmcomp/proc_sparc.ml')
-rw-r--r--asmcomp/proc_sparc.ml15
1 files changed, 5 insertions, 10 deletions
diff --git a/asmcomp/proc_sparc.ml b/asmcomp/proc_sparc.ml
index 0672735dd7..13c70a7863 100644
--- a/asmcomp/proc_sparc.ml
+++ b/asmcomp/proc_sparc.ml
@@ -282,13 +282,8 @@ let assemble_file infile outfile =
let create_archive archive file_list =
Misc.remove_file archive;
- match Config.system with
- "sunos" ->
- Sys.command ("ar rc " ^ archive ^ " " ^ String.concat " " file_list ^
- " && ranlib " ^ archive)
- | "solaris" ->
- Sys.command ("ar rc " ^ archive ^ " " ^ String.concat " " file_list)
- | _ ->
- fatal_error "Proc_sparc.create_archive"
-
-
+ if Config.system = "solaris" then
+ Sys.command ("ar rc " ^ archive ^ " " ^ String.concat " " file_list)
+ else
+ Sys.command ("ar rc " ^ archive ^ " " ^ String.concat " " file_list ^
+ " && ranlib " ^ archive)