unoidl2

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/unoidl2.git/
Log | Files | Refs

unoidl2ast.c (1056B)


      1 /* unoidl2ast -- convert uno idl input to syntax tree */
      2 /*
      3    This file is part of unoidl2.
      4 
      5    unoidl2 is free software: you can redistribute it and/or modify
      6    it under the terms of the GNU General Public License as published by
      7    the Free Software Foundation, either version 3 of the License, or
      8    (at your option) any later version.
      9 
     10    unoidl2 is distributed in the hope that it will be useful,
     11    but WITHOUT ANY WARRANTY; without even the implied warranty of
     12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     13    GNU General Public License for more details.
     14 
     15    You should have received a copy of the GNU General Public License
     16    along with unoidl2.  If not, see <http://www.gnu.org/licenses/>.
     17 */
     18 
     19 #include "unoidl2.h"
     20 #include "parse.c.h"
     21 
     22 #include <stdio.h>
     23 
     24 extern int yyparse();
     25 
     26 extern const Any NIL;
     27 extern const Any ast;
     28 extern const Any root2;
     29 
     30 static Any pr1(Any x) {print(x); printf("\n\n");}
     31 
     32 int main() {
     33   init();
     34   yyparse();
     35   //mapc(pr1, ast);
     36   mapc(build2, ast);
     37   walk2_fn = pr1;
     38   walk2(root2);
     39   return 0;
     40 }