HCoop
/
bpt
/
coccinelle.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
coccinelle release 0.2.5
[bpt/coccinelle.git]
/
engine
/
check_exhaustive_pattern.ml
diff --git
a/engine/check_exhaustive_pattern.ml
b/engine/check_exhaustive_pattern.ml
index
d1272ae
..
d52ab04
100644
(file)
--- a/
engine/check_exhaustive_pattern.ml
+++ b/
engine/check_exhaustive_pattern.ml
@@
-65,6
+65,7
@@
let dumb_astcocci_rule_elem = function
| A.Return _ -> ()
| A.ReturnExpr (_, ea, _) -> ()
| A.DefineHeader _ -> ()
| A.Return _ -> ()
| A.ReturnExpr (_, ea, _) -> ()
| A.DefineHeader _ -> ()
+ | A.Undef _ -> ()
| A.Include _ -> ()
| A.Default _ -> ()
| A.Case _ -> ()
| A.Include _ -> ()
| A.Default _ -> ()
| A.Case _ -> ()
@@
-78,6
+79,7
@@
let dumb_astcocci_decl = function
| A.Ddots(dots,whencode) -> ()
| A.MetaDecl _ -> ()
| A.MetaField _ -> ()
| A.Ddots(dots,whencode) -> ()
| A.MetaDecl _ -> ()
| A.MetaField _ -> ()
+ | A.MetaFieldList _ -> ()
| A.Typedef(d,ty1,ty2,pv) -> ()
| A.DisjDecl xs -> ()
| A.OptDecl _ | A.UniqueDecl _ -> ()
| A.Typedef(d,ty1,ty2,pv) -> ()
| A.DisjDecl xs -> ()
| A.OptDecl _ | A.UniqueDecl _ -> ()
@@
-92,6
+94,7
@@
let dumb_astcocci_initialiser = function
| A.Ddots(dots,whencode) -> ()
| A.MetaDecl(name,_,_) -> ()
| A.MetaField(name,_,_) -> ()
| A.Ddots(dots,whencode) -> ()
| A.MetaDecl(name,_,_) -> ()
| A.MetaField(name,_,_) -> ()
+ | A.MetaFieldList(name,_,_,_) -> ()
| A.OptDecl(decl) -> ()
| A.UniqueDecl(decl) -> ()
| A.OptDecl(decl) -> ()
| A.UniqueDecl(decl) -> ()