| #define xCAT(A,B) A ## B |
| #define CAT(A,B) xCAT(A,B) |
| #undef TYPE |
| #define TYPE CAT(isl_,BASE) |
| #define xFN(TYPE,NAME) TYPE ## _ ## NAME |
| #define FN(TYPE,NAME) xFN(TYPE,NAME) |
| |
| void FN(TYPE,dump)(__isl_keep TYPE *obj) |
| { |
| isl_printer *p; |
| |
| if (!obj) |
| return; |
| |
| p = isl_printer_to_file(FN(TYPE,get_ctx)(obj), stderr); |
| p = isl_printer_set_yaml_style(p, ISL_YAML_STYLE_BLOCK); |
| p = FN(isl_printer_print,BASE)(p, obj); |
| isl_printer_free(p); |
| } |
| |
| /* Return a string representation of "obj". |
| * Print the object in flow format. |
| */ |
| __isl_give char *FN(TYPE,to_str)(__isl_keep TYPE *obj) |
| { |
| isl_printer *p; |
| char *s; |
| |
| if (!obj) |
| return NULL; |
| |
| p = isl_printer_to_str(FN(TYPE,get_ctx)(obj)); |
| p = isl_printer_set_yaml_style(p, ISL_YAML_STYLE_FLOW); |
| p = FN(isl_printer_print,BASE)(p, obj); |
| s = isl_printer_get_str(p); |
| isl_printer_free(p); |
| |
| return s; |
| } |