2 space indentation
This commit is contained in:
@@ -2,72 +2,72 @@
|
||||
|
||||
int main(int argc, char *argv[]) {
|
||||
|
||||
mpc_parser_t *Input = mpc_new("input");
|
||||
mpc_parser_t *Node = mpc_new("node");
|
||||
mpc_parser_t *Leaf = mpc_new("leaf");
|
||||
mpc_ast_t *ast, *tree, *child, *child_sub;
|
||||
mpc_result_t r;
|
||||
int index, lb;
|
||||
mpc_parser_t *Input = mpc_new("input");
|
||||
mpc_parser_t *Node = mpc_new("node");
|
||||
mpc_parser_t *Leaf = mpc_new("leaf");
|
||||
mpc_ast_t *ast, *tree, *child, *child_sub;
|
||||
mpc_result_t r;
|
||||
int index, lb;
|
||||
|
||||
mpca_lang(MPCA_LANG_PREDICTIVE,
|
||||
" node : '(' <node> ',' /foo/ ',' <node> ')' | <leaf>;"
|
||||
" leaf : /bar/;"
|
||||
" input : /^/ <node> /$/;",
|
||||
Node, Leaf, Input, NULL);
|
||||
mpca_lang(MPCA_LANG_PREDICTIVE,
|
||||
" node : '(' <node> ',' /foo/ ',' <node> ')' | <leaf>;"
|
||||
" leaf : /bar/;"
|
||||
" input : /^/ <node> /$/;",
|
||||
Node, Leaf, Input, NULL);
|
||||
|
||||
if (argc > 1) {
|
||||
|
||||
if (mpc_parse_contents(argv[1], Input, &r)) {
|
||||
ast = r.output;
|
||||
} else {
|
||||
mpc_err_print(r.error);
|
||||
mpc_err_delete(r.error);
|
||||
mpc_cleanup(3, Node, Leaf, Input);
|
||||
return EXIT_FAILURE;
|
||||
}
|
||||
if (argc > 1) {
|
||||
|
||||
if (mpc_parse_contents(argv[1], Input, &r)) {
|
||||
ast = r.output;
|
||||
} else {
|
||||
|
||||
if (mpc_parse_pipe("<stdin>", stdin, Input, &r)) {
|
||||
ast = r.output;
|
||||
} else {
|
||||
mpc_err_print(r.error);
|
||||
mpc_err_delete(r.error);
|
||||
mpc_cleanup(3, Node, Leaf, Input);
|
||||
return EXIT_FAILURE;
|
||||
}
|
||||
|
||||
mpc_err_print(r.error);
|
||||
mpc_err_delete(r.error);
|
||||
mpc_cleanup(3, Node, Leaf, Input);
|
||||
return EXIT_FAILURE;
|
||||
}
|
||||
|
||||
/* Get index or child of tree */
|
||||
tree = ast->children[1];
|
||||
} else {
|
||||
|
||||
index = mpc_ast_get_index(tree, "node|>");
|
||||
child = mpc_ast_get_child(tree, "node|>");
|
||||
|
||||
if(child == NULL) {
|
||||
mpc_cleanup(3, Node, Leaf, Input);
|
||||
mpc_ast_delete(ast);
|
||||
return EXIT_FAILURE;
|
||||
if (mpc_parse_pipe("<stdin>", stdin, Input, &r)) {
|
||||
ast = r.output;
|
||||
} else {
|
||||
mpc_err_print(r.error);
|
||||
mpc_err_delete(r.error);
|
||||
mpc_cleanup(3, Node, Leaf, Input);
|
||||
return EXIT_FAILURE;
|
||||
}
|
||||
|
||||
printf("Index: %d; Child: \"%s\"\n", index, child->tag);
|
||||
}
|
||||
|
||||
/* Get multiple indexes or children of trees */
|
||||
index = mpc_ast_get_index_lb(child, "node|leaf|regex", 0);
|
||||
child_sub = mpc_ast_get_child_lb(child, "node|leaf|regex", 0);
|
||||
/* Get index or child of tree */
|
||||
tree = ast->children[1];
|
||||
|
||||
while(index != -1) {
|
||||
printf("-- Index: %d; Child: \"%s\"\n", index, child_sub->tag);
|
||||
index = mpc_ast_get_index(tree, "node|>");
|
||||
child = mpc_ast_get_child(tree, "node|>");
|
||||
|
||||
lb = index + 1;
|
||||
index = mpc_ast_get_index_lb(child, "node|leaf|regex", lb);
|
||||
child_sub = mpc_ast_get_child_lb(child, "node|leaf|regex", lb);
|
||||
}
|
||||
|
||||
/* Clean up and return */
|
||||
if(child == NULL) {
|
||||
mpc_cleanup(3, Node, Leaf, Input);
|
||||
mpc_ast_delete(ast);
|
||||
return EXIT_FAILURE;
|
||||
}
|
||||
|
||||
return EXIT_SUCCESS;
|
||||
printf("Index: %d; Child: \"%s\"\n", index, child->tag);
|
||||
|
||||
/* Get multiple indexes or children of trees */
|
||||
index = mpc_ast_get_index_lb(child, "node|leaf|regex", 0);
|
||||
child_sub = mpc_ast_get_child_lb(child, "node|leaf|regex", 0);
|
||||
|
||||
while(index != -1) {
|
||||
printf("-- Index: %d; Child: \"%s\"\n", index, child_sub->tag);
|
||||
|
||||
lb = index + 1;
|
||||
index = mpc_ast_get_index_lb(child, "node|leaf|regex", lb);
|
||||
child_sub = mpc_ast_get_child_lb(child, "node|leaf|regex", lb);
|
||||
}
|
||||
|
||||
/* Clean up and return */
|
||||
mpc_cleanup(3, Node, Leaf, Input);
|
||||
mpc_ast_delete(ast);
|
||||
|
||||
return EXIT_SUCCESS;
|
||||
}
|
||||
|
Reference in New Issue
Block a user