diff options
| author | Kathy Gray | 2014-03-01 12:12:37 +0000 |
|---|---|---|
| committer | Kathy Gray | 2014-03-01 12:12:37 +0000 |
| commit | d62ca20800439a4b1a31e028b3e4451330928bdb (patch) | |
| tree | 38b109b1defb9d9b7473ee1d12738d7a4a548523 /src/pretty_print.ml | |
| parent | 75788ce047418b88738635597d6eebf5c31f9752 (diff) | |
Fix printing bug on vector slicing that caused only one element to ever be sliced
Diffstat (limited to 'src/pretty_print.ml')
| -rw-r--r-- | src/pretty_print.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/pretty_print.ml b/src/pretty_print.ml index 57a8ebab..a06d1fe5 100644 --- a/src/pretty_print.ml +++ b/src/pretty_print.ml @@ -646,7 +646,7 @@ and pp_lem_exp ppf (E_aux(e,(l,annot))) = fprintf ppf "@[<0>(%a [%a]) @]" kwd "E_vector_indexed" (list_pp iformat lformat) iexps | E_vector_access(v,e) -> fprintf ppf "@[<0>(%a %a %a)@]" kwd "E_vector_access" pp_lem_exp v pp_lem_exp e | E_vector_subrange(v,e1,e2) -> - fprintf ppf "@[<0>(%a %a %a %a)@]" kwd "E_vector_subrange" pp_lem_exp v pp_lem_exp e1 pp_lem_exp e1 + fprintf ppf "@[<0>(%a %a %a %a)@]" kwd "E_vector_subrange" pp_lem_exp v pp_lem_exp e1 pp_lem_exp e2 | E_vector_update(v,e1,e2) -> fprintf ppf "@[<0>(%a %a %a %a)@]" kwd "E_vector_update" pp_lem_exp v pp_lem_exp e1 pp_lem_exp e2 | E_vector_update_subrange(v,e1,e2,e3) -> |