ParenType and FunctionType are now added to the SmPL ASTs. Add cases for these types in ast0toast.ml.
Signed-off-by: Jaskaran Singh <jaskaransingh7654...@gmail.com> --- parsing_cocci/ast0toast.ml | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/parsing_cocci/ast0toast.ml b/parsing_cocci/ast0toast.ml index f1bbde0b..dc7b30f7 100644 --- a/parsing_cocci/ast0toast.ml +++ b/parsing_cocci/ast0toast.ml @@ -562,6 +562,7 @@ and typeC allminus t = | types -> Ast.DisjType(List.map (rewrap t no_isos) types)) | Ast0.BaseType(_) | Ast0.Signed(_,_) | Ast0.Pointer(_,_) | Ast0.FunctionPointer(_,_,_,_,_,_,_) + | Ast0.ParenType(_,_,_) | Ast0.FunctionType(_,_,_,_) | Ast0.Array(_,_,_,_) | Ast0.Decimal(_,_,_,_,_,_) | Ast0.EnumName(_,_) | Ast0.StructUnionName(_,_) | Ast0.StructUnionDef(_,_,_,_) | Ast0.EnumDef(_,_,_,_) @@ -588,6 +589,11 @@ and base_typeC allminus t = Ast.FunctionPointer (typeC allminus ty,mcode lp1,mcode star,mcode rp1, mcode lp2,parameter_list params,mcode rp2) + | Ast0.ParenType(lp,ty,rp) -> + Ast.ParenType(mcode lp,typeC allminus ty,mcode rp) + | Ast0.FunctionType(ty,lp,params,rp) -> + Ast.FunctionType + (typeC allminus ty,mcode lp,parameter_list params,mcode rp) | Ast0.Array(ty,lb,size,rb) -> Ast.Array(typeC allminus ty,mcode lb,get_option expression size, mcode rb) -- 2.21.1 _______________________________________________ Cocci mailing list Cocci@systeme.lip6.fr https://systeme.lip6.fr/mailman/listinfo/cocci