From 7247839e87b05b306250ec52f3a15b6fc0977c63 Mon Sep 17 00:00:00 2001 From: Paweł Dybiec Date: Wed, 7 Nov 2018 11:04:45 +0100 Subject: Fix ast rawprinter --- source/xi_lib/ast_rawprinter.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/xi_lib/ast_rawprinter.ml b/source/xi_lib/ast_rawprinter.ml index 0c6494e..a644368 100644 --- a/source/xi_lib/ast_rawprinter.ml +++ b/source/xi_lib/ast_rawprinter.ml @@ -179,7 +179,7 @@ let rec p_expression = function ; "arg", p_expression arg ] - | EXPR_Index {tag; loc; expr; index} -> p_dict "EXPR_Length" + | EXPR_Index {tag; loc; expr; index} -> p_dict "EXPR_Index" [ "loc", p_location loc ; "tag", p_node_tag tag ; "expr", p_expression expr -- cgit 1.4.1