main.c

   1 /*
   2  * Copyright (C) 2012
   3  *      Dale Weiler
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining a copy of
   6  * this software and associated documentation files (the "Software"), to deal in
   7  * the Software without restriction, including without limitation the rights to
   8  * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
   9  * of the Software, and to permit persons to whom the Software is furnished to do
  10  * so, subject to the following conditions:
  11  *
  12  * The above copyright notice and this permission notice shall be included in all
  13  * copies or substantial portions of the Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  18  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  20  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  21  * SOFTWARE.
  22  */
  23 #       include <stdlib.h>
  24         #include <string.h>
  25 #               include <limits.h>
  26   #       include       "gmqcc.h"
  27
  28 int main(int argc, char **argv) {
  29         argc--;
  30         argv++;
  31
  32         const char *ifile = argv[0];
  33
  34         FILE *fp = fopen(ifile, "r");
  35         if  (!fp) {
  36                 fclose(fp);
  37                 return error(ERROR_COMPILER, "Source file: %s not found\n", ifile);
  38         } else {
  39                 struct lex_file *lex = lex_open(fp);
  40                 if (!lex) {
  41                         fclose(fp);
  42                         return 0;
  43                 }
  44                 parse_tree(lex);
  45                 lex_close (lex);
  46         }
  47
  48         code_write();
  49         return 0;
  50 }