X-Git-Url: http://git.hcoop.net/bpt/coccinelle.git/blobdiff_plain/abad11c5570b7b9bbae5ff92b3050cf68fe3fd14..1b9ae60616d2f065ce16fe26385b684e13b40284:/parsing_cocci/index.ml

diff --git a/parsing_cocci/index.ml b/parsing_cocci/index.ml
index 2784b99..028ad2c 100644
--- a/parsing_cocci/index.ml
+++ b/parsing_cocci/index.ml
@@ -187,6 +187,7 @@ let parameterTypeDef p =
   | Ast0.Pcircles(dots) -> [65]
   | Ast0.OptParam(param) -> [66]
   | Ast0.UniqueParam(param) -> [67]
+  | Ast0.AsParam _ -> failwith "not possible"
 
 let statement s =
   match Ast0.unwrap s with