Release coccinelle-0.2.3rc1

[bpt/coccinelle.git] / commons / common.ml

diff --git a/commons/common.ml b/commons/common.ml
index 5bf1316..2d26605 100644 (file)
--- a/commons/common.ml
+++ b/commons/common.ml
@@ -1394,7 +1394,7 @@ exception WrongFormat of string
 (* old: let _TODO () = failwith "TODO",  now via fix_caml with raise Todo *)
 
 let internal_error s = failwith ("internal error: "^s)
-let error_cant_have x = internal_error ("cant have this case" ^(dump x))
+let error_cant_have x = internal_error ("cant have this case: " ^(dump x))
 let myassert cond = if cond then () else failwith "assert error"