Cast attributes are added to AST0 of SmPL. Visit these attributes in the
AST0 visitor of SmPL.
Signed-off-by: Jaskaran Singh <jaskaransingh7654...@gmail.com>
---
parsing_cocci/visitor_ast0.ml | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/parsing_cocci/visitor_ast0.ml b/parsing_cocci/visitor_ast0.ml
index d9e340ed..2ccdb0bb 100644
--- a/parsing_cocci/visitor_ast0.ml
+++ b/parsing_cocci/visitor_ast0.ml
@@ -184,12 +184,14 @@ let visitor mode bind option_default
let (ar_n,ar) = string_mcode ar in
let (field_n,field) = ident field in
(multibind [exp_n;ar_n;field_n], Ast0.RecordPtAccess(exp,ar,field))
- | Ast0.Cast(lp,ty,rp,exp) ->
+ | Ast0.Cast(lp,ty,attr,rp,exp) ->
let (lp_n,lp) = string_mcode lp in
let (ty_n,ty) = typeC ty in
+ let (attr_n,attr) = map_split_bind string_mcode attr in
let (rp_n,rp) = string_mcode rp in
let (exp_n,exp) = expression exp in
- (multibind [lp_n;ty_n;rp_n;exp_n], Ast0.Cast(lp,ty,rp,exp))
+ (multibind [lp_n;ty_n;attr_n;rp_n;exp_n],
+ Ast0.Cast(lp,ty,attr,rp,exp))
| Ast0.SizeOfExpr(szf,exp) ->
let (szf_n,szf) = string_mcode szf in
let (exp_n,exp) = expression exp in
--
2.21.1
_______________________________________________
Cocci mailing list
Cocci@systeme.lip6.fr
https://systeme.lip6.fr/mailman/listinfo/cocci
