diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1995-06-22 10:11:18 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1995-06-22 10:11:18 +0000 |
| commit | 41bd2b61538eedb5d24dcae01b11e533a398dff8 (patch) | |
| tree | a8f60e0397eaebdcba0f2000c7deaff28b0f7371 /bytecomp/printinstr.ml | |
| parent | 57c7dfd8fed5efd2d66f0b990941ade7382fa012 (diff) | |
| download | ocaml-41bd2b61538eedb5d24dcae01b11e533a398dff8.tar.gz | |
Fermetures representees en un seul bloc
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@49 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'bytecomp/printinstr.ml')
| -rw-r--r-- | bytecomp/printinstr.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/bytecomp/printinstr.ml b/bytecomp/printinstr.ml index c160d10cb8..0693b6a9e4 100644 --- a/bytecomp/printinstr.ml +++ b/bytecomp/printinstr.ml @@ -34,7 +34,7 @@ let instruction = function | Kgetfield n -> print_string "\tgetfield "; print_int n | Ksetfield n -> print_string "\tsetfield "; print_int n | Kdummy n -> print_string "\tdummy "; print_int n - | Kupdate -> print_string "\tupdate" + | Kupdate n -> print_string "\tupdate"; print_int n | Kvectlength -> print_string "\tvectlength" | Kgetvectitem -> print_string "\tgetvectitem" | Ksetvectitem -> print_string "\tsetvectitem" |