diff options
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 c160d10cb..0693b6a9e 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" |