FIX - typo in error message in ast_simplified/combinator.ml

This commit is contained in:
Pierre-Emmanuel Wulfman 2019-07-24 09:35:22 +00:00 committed by Georges Dupéron
parent 8a4d49fd21
commit 7414893cd5

View File

@ -148,7 +148,7 @@ let get_e_pair = fun t ->
let get_e_list = fun t ->
match t with
| E_list lst -> ok lst
| _ -> simple_fail "not a pair"
| _ -> simple_fail "not a list"
let get_e_failwith = fun e ->
match Location.unwrap e with