diff options
| author | Jérôme Vouillon <Jerome.Vouillon@pps.jussieu.fr> | 1996-04-22 11:15:41 +0000 |
|---|---|---|
| committer | Jérôme Vouillon <Jerome.Vouillon@pps.jussieu.fr> | 1996-04-22 11:15:41 +0000 |
| commit | 7974a9d8b1c8195130b2df216d6a102ca00cdf5b (patch) | |
| tree | 3f51cdf262616b852002b94057a292618f522fca /asmcomp/split.ml | |
| parent | 6b9559fabf7b4a669ff4b082a3eaacffd82f775f (diff) | |
| download | ocaml-7974a9d8b1c8195130b2df216d6a102ca00cdf5b.tar.gz | |
Extension objets.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@756 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'asmcomp/split.ml')
| -rw-r--r-- | asmcomp/split.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/asmcomp/split.ml b/asmcomp/split.ml index f22ddc93e2..e14b9e4e0f 100644 --- a/asmcomp/split.ml +++ b/asmcomp/split.ml @@ -31,7 +31,7 @@ let subst_regs rv sub = None -> rv | Some s -> let n = Array.length rv in - let nv = Array.new n Reg.dummy in + let nv = Array.create n Reg.dummy in for i = 0 to n-1 do nv.(i) <- subst_reg rv.(i) s done; nv |