00001 /* 00002 * Copyright (c) 2010 Jiri Svoboda 00003 * All rights reserved. 00004 * 00005 * Redistribution and use in source and binary forms, with or without 00006 * modification, are permitted provided that the following conditions 00007 * are met: 00008 * 00009 * - Redistributions of source code must retain the above copyright 00010 * notice, this list of conditions and the following disclaimer. 00011 * - Redistributions in binary form must reproduce the above copyright 00012 * notice, this list of conditions and the following disclaimer in the 00013 * documentation and/or other materials provided with the distribution. 00014 * - The name of the author may not be used to endorse or promote products 00015 * derived from this software without specific prior written permission. 00016 * 00017 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 00018 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 00019 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 00020 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 00021 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 00022 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 00023 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 00024 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 00025 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 00026 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00027 */ 00028 00029 #ifndef PARSE_H_ 00030 #define PARSE_H_ 00031 00032 #include "mytypes.h" 00033 00034 void parse_init(parse_t *parse, struct stree_program *prog, struct lex *lex); 00035 void parse_module(parse_t *parse); 00036 00037 stree_stat_t *parse_stat(parse_t *parse); 00038 stree_ident_t *parse_ident(parse_t *parse); 00039 00040 void parse_raise_error(parse_t *parse); 00041 void parse_note_error(parse_t *parse); 00042 bool_t parse_is_error(parse_t *parse); 00043 void parse_recover_error(parse_t *parse); 00044 00045 /* 00046 * Parsing primitives 00047 */ 00048 lem_t *lcur(parse_t *parse); 00049 lclass_t lcur_lc(parse_t *parse); 00050 cspan_t *lcur_span(parse_t *parse); 00051 cspan_t *lprev_span(parse_t *parse); 00052 00053 void lskip(parse_t *parse); 00054 void lcheck(parse_t *parse, lclass_t lc); 00055 void lmatch(parse_t *parse, lclass_t lc); 00056 void lunexpected_error(parse_t *parse); 00057 00058 bool_t terminates_block(lclass_t lclass); 00059 00060 #endif