PetScan::extract_for: explicitly keep track of when iterator is virtual
[pet.git] / main.c
blobf411d48ecfaa25c6acb4c507f1d8a552655c6207
1 /*
2 * Copyright 2011 Leiden University. All rights reserved.
3 *
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
6 * are met:
7 *
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above
12 * copyright notice, this list of conditions and the following
13 * disclaimer in the documentation and/or other materials provided
14 * with the distribution.
16 * THIS SOFTWARE IS PROVIDED BY LEIDEN UNIVERSITY ''AS IS'' AND ANY
17 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL LEIDEN UNIVERSITY OR
20 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
21 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
22 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
23 * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 * The views and conclusions contained in the software and documentation
29 * are those of the authors and should not be interpreted as
30 * representing official policies, either expressed or implied, of
31 * Leiden University.
32 */
34 #include <isl/arg.h>
35 #include <isl/ctx.h>
37 #include "options.h"
38 #include "scop.h"
39 #include "scop_yaml.h"
41 struct options {
42 struct pet_options *pet;
43 char *input;
46 ISL_ARGS_START(struct options, options_args)
47 ISL_ARG_CHILD(struct options, pet, NULL, &pet_options_args, NULL)
48 ISL_ARG_ARG(struct options, input, "input", NULL)
49 ISL_ARGS_END
51 ISL_ARG_DEF(options, struct options, options_args)
53 int main(int argc, char *argv[])
55 isl_ctx *ctx;
56 struct pet_scop *scop;
57 struct options *options;
59 options = options_new_with_defaults();
60 ctx = isl_ctx_alloc_with_options(&options_args, options);
61 argc = options_parse(options, argc, argv, ISL_ARG_ALL);
63 scop = pet_scop_extract_from_C_source(ctx, options->input, NULL);
65 if (scop)
66 pet_scop_emit(stdout, scop);
68 pet_scop_free(scop);
70 isl_ctx_free(ctx);
71 return 0;