Improve error message.
This commit is contained in:
parent
5a8d93c652
commit
df0eebcf1e
@ -1098,8 +1098,7 @@ let project_type
|
||||
|
||||
| (_,_) ->
|
||||
bug ()
|
||||
"unhandled form of lval-ext in Semant."
|
||||
"project_ty: %a indexed by %a"
|
||||
"project_ty: bad lval-ext: %a indexed by %a"
|
||||
Ast.sprintf_ty base_ty Ast.sprintf_lval_component comp
|
||||
;;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user