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

Reply via email to