///////////////////////////////////////////////////////////////////////////////
// Date:     Mon Oct 22 00:07:00 CDT 2007
// Author:   John Quigley <jquigley@jquigley.com>
// Revision: $Id$
//
// The White Programming Language
// Copyright (C) 2007 John Quigley <jquigley@jquigley.com> 
//
// This program is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program.  If not, see <http://www.gnu.org/licenses/>.
///////////////////////////////////////////////////////////////////////////////

#include <stdio.h>
#include <stdlib.h>

#include "core/gc.h"
#include "core/util.h"
#include "frontend/scan.h"
#include "frontend/parse.h"

extern yyparse(void *);

int main(int argc, char **argv)
{
    WGC *gc = WGC_new();
    WGC_init(gc);
    
    yyscan_t scanner;
    yylex_init(&scanner);

    if (argc > 1)
        yyset_in(fopen(argv[1], "r"), scanner);
    else
        yyset_in(stdin, scanner);

    do
    {
        LOGGER_DEBUG("starting parse.");
        printf("Main> ");
        yyparse(scanner);
    }
    while (!feof(yyget_in(scanner)));

    LOGGER_DEBUG("Done.");

    yylex_destroy(scanner);
    WGC_delete(gc);

    return EXIT_SUCCESS;
}

// EOF