Macrodecl attributes are added to the SmPL AST. Visit these attributes
the AST0 visitor of SmPL.

Signed-off-by: Jaskaran Singh <[email protected]>
---
 parsing_cocci/visitor_ast0.ml | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/parsing_cocci/visitor_ast0.ml b/parsing_cocci/visitor_ast0.ml
index d9e340ed..edc8ff78 100644
--- a/parsing_cocci/visitor_ast0.ml
+++ b/parsing_cocci/visitor_ast0.ml
@@ -637,15 +637,16 @@ let visitor mode bind option_default
            let (sem_n,sem) = string_mcode sem in
            (multibind [fi_n;name_n;lp1_n;params_n;va_n;rp1_n;sem_n],
             Ast0.FunProto(fi,name,lp1,params,va,rp1,sem))
-       | Ast0.MacroDecl(stg,name,lp,args,rp,sem) ->
+       | Ast0.MacroDecl(stg,name,lp,args,rp,attr,sem) ->
            let (stg_n,stg) = get_option storage_mcode stg in
            let (name_n,name) = ident name in
            let (lp_n,lp) = string_mcode lp in
            let (args_n,args) = expression_dots args in
            let (rp_n,rp) = string_mcode rp in
+           let (attr_n,attr) = map_split_bind string_mcode attr in
            let (sem_n,sem) = string_mcode sem in
-           (multibind [stg_n;name_n;lp_n;args_n;rp_n;sem_n],
-            Ast0.MacroDecl(stg,name,lp,args,rp,sem))
+           (multibind [stg_n;name_n;lp_n;args_n;rp_n;attr_n;sem_n],
+            Ast0.MacroDecl(stg,name,lp,args,rp,attr,sem))
        | Ast0.MacroDeclInit(stg,name,lp,args,rp,eq,ini,sem) ->
            let (stg_n,stg) = get_option storage_mcode stg in
            let (name_n,name) = ident name in
-- 
2.21.1

_______________________________________________
Cocci mailing list
[email protected]
https://systeme.lip6.fr/mailman/listinfo/cocci

Reply via email to