| 1 | exception CantBeInPlus |
| 2 | |
| 3 | type pos = Before | After | InPlace |
| 4 | type nlhint = StartBox | EndBox | SpaceOrNewline of string ref |
| 5 | |
| 6 | val pp_list_list_any : |
| 7 | Ast_c.metavars_binding list * |
| 8 | (* pr cocci *) |
| 9 | (string -> int (*line*) -> int (*lcol*) -> int (*rcol*) -> nlhint option |
| 10 | -> unit) * |
| 11 | (Ast_c.info -> unit) (* pr c *) * |
| 12 | (unit -> unit) (* pr C space *) * |
| 13 | (unit -> unit) (* pr space *) * |
| 14 | (string -> unit) (* pr arity *) * |
| 15 | (int (*line*) -> int (*lcol*) -> unit) (* pr barrier *) * |
| 16 | (unit -> unit) (* indent *) * (bool -> unit) (* unindent *) * |
| 17 | (unit -> unit) (* eat_space *)-> |
| 18 | bool (*true if generating*) -> Ast_cocci.anything list list -> pos -> |
| 19 | unit |