brintos

brintos / llvm-project-archived public Read only

0
0
Text · 1.7 KiB · c483383 Raw
70 lines · c
1#include <assert.h>2#include <isl/obj.h>3#include <isl/printer.h>4#include <isl/stream.h>5#include <isl/options.h>6 7struct isl_arg_choice cat_format[] = {8	{"isl",		ISL_FORMAT_ISL},9	{"omega",	ISL_FORMAT_OMEGA},10	{"polylib",	ISL_FORMAT_POLYLIB},11	{"ext-polylib",	ISL_FORMAT_EXT_POLYLIB},12	{"latex",	ISL_FORMAT_LATEX},13	{"C",		ISL_FORMAT_C},14	{0}15};16 17struct isl_arg_choice cat_yaml_style[] = {18	{ "block",	ISL_YAML_STYLE_BLOCK },19	{ "flow",	ISL_YAML_STYLE_FLOW },20	{ 0 }21};22 23struct cat_options {24	struct isl_options	*isl;25	unsigned		 format;26	unsigned		 yaml_style;27};28 29ISL_ARGS_START(struct cat_options, cat_options_args)30ISL_ARG_CHILD(struct cat_options, isl, "isl", &isl_options_args, "isl options")31ISL_ARG_CHOICE(struct cat_options, format, 0, "format", \32	cat_format,	ISL_FORMAT_ISL, "output format")33ISL_ARG_CHOICE(struct cat_options, yaml_style, 0, "yaml-style", \34	cat_yaml_style, ISL_YAML_STYLE_BLOCK, "output YAML style")35ISL_ARGS_END36 37ISL_ARG_DEF(cat_options, struct cat_options, cat_options_args)38 39int main(int argc, char **argv)40{41	struct isl_ctx *ctx;42	isl_stream *s;43	struct isl_obj obj;44	struct cat_options *options;45	isl_printer *p;46 47	options = cat_options_new_with_defaults();48	assert(options);49	argc = cat_options_parse(options, argc, argv, ISL_ARG_ALL);50 51	ctx = isl_ctx_alloc_with_options(&cat_options_args, options);52 53	s = isl_stream_new_file(ctx, stdin);54	obj = isl_stream_read_obj(s);55	isl_stream_free(s);56 57	p = isl_printer_to_file(ctx, stdout);58	p = isl_printer_set_output_format(p, options->format);59	p = isl_printer_set_yaml_style(p, options->yaml_style);60	p = obj.type->print(p, obj.v);61	p = isl_printer_end_line(p);62	isl_printer_free(p);63 64	obj.type->free(obj.v);65 66	isl_ctx_free(ctx);67 68	return 0;69}70