- Ast0.Init(Some stg,ty,id,eq,ini,sem) ->
+ Ast0.MetaDecl(name,pure) ->
+ call_right right_mcode name decl
+ (function name -> Ast0.MetaDecl(name,pure))
+ | Ast0.MetaField(name,pure) ->
+ call_right right_mcode name decl
+ (function name -> Ast0.MetaField(name,pure))
+ | Ast0.Init(Some stg,ty,id,eq,ini,sem) ->