- | Ast.MetaParamListDecl(ar, name, Ast.AnyLen) ->
- no_arity ar; pr "parameter list "; pp_name name; pr ";\n"
- | Ast.MetaParamListDecl(ar, name, Ast.MetaLen len) ->
- no_arity ar; pr "parameter list "; pp_name name;
- pr "["; pp_name len; pr "]"; pr ";\n"
- | Ast.MetaParamListDecl(ar, name, Ast.CstLen len) ->
- no_arity ar; pr "parameter list "; pr (string_of_int len);
- pr "["; pr (string_of_int len); pr "]"; pr ";\n"
+ | Ast.MetaParamListDecl(ar, name, len) ->
+ no_arity ar; pr "parameter list "; pp_name name; pp_len pr len; pr ";\n"