diff options
author | Damien Doligez <damien.doligez-inria.fr> | 2005-01-21 18:15:55 +0000 |
---|---|---|
committer | Damien Doligez <damien.doligez-inria.fr> | 2005-01-21 18:15:55 +0000 |
commit | 461779527fdea726bb397416264ae77cd7da458b (patch) | |
tree | e8aefdc94e05a529cf464e3c4e895bc0791c1423 /asmcomp/asmpackager.ml | |
parent | 1889817c2d76840b22af600a26c7250fd4a95419 (diff) | |
download | ocaml-461779527fdea726bb397416264ae77cd7da458b.tar.gz |
ajout support ocamlopt -pack pour Mac OS X
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6750 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'asmcomp/asmpackager.ml')
-rw-r--r-- | asmcomp/asmpackager.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/asmcomp/asmpackager.ml b/asmcomp/asmpackager.ml index 10ac15c5f5..235fdd11f5 100644 --- a/asmcomp/asmpackager.ml +++ b/asmcomp/asmpackager.ml @@ -85,7 +85,8 @@ let extract_symbols units symbolfile = try let i = 3 + (try search_substring " T " l 0 with Not_found -> try search_substring " D " l 0 with Not_found -> - search_substring " R " l 0) in + try search_substring " R " l 0 with Not_found -> + search_substring " S " l 0) in let j = try search_substring "__" l i with Not_found -> String.length l in let k = if l.[i] = '_' then i + 1 else i in |