%skeleton "lalr1.cc"
//%require  "3.0"
%debug
%defines
%define namespace "QIlib"
%define parser_class_name "lispLike_Parser"

%code requires{ 
   #include <QString>
   namespace QIlib {
      class lispLike_Driver;
      class lispLike_Scanner;
   }
}

%lex-param   { QIlib::lispLike_Scanner  &scanner  }
%parse-param { QIlib::lispLike_Scanner  &scanner  }

%lex-param   { QIlib::lispLike_Driver  &driver  }
%parse-param { QIlib::lispLike_Driver  &driver  }

%code{
   #include <iostream>
   #include <cstdlib>
   #include <fstream>
   /* include for all driver functions */
   #include <lispLike_driver.h>

   /* this is silly, but I can't figure out a way around */
   static int yylex(QIlib::lispLike_Parser::semantic_type *yylval,
                    QIlib::lispLike_Scanner  &scanner,
                    QIlib::lispLike_Driver   &driver);


}

/* token types */
%union {
   QString* sval;
}

//%token            END    0     "end of file"
%token   <sval>   VALUE
%token   <sval>   NODE
%token            CLOSENODE

/* destructor rule for <sval> objects */
%destructor { if ($$)  { delete ($$); ($$) = NULL; } } <sval>


%%

PartNode
  : NODE  { driver.add_node( *$1 ); }
  | PartNode NODE { driver.add_node( *$2 ); }
  | PartNode VALUE { driver.add_value( *$2 ); }
  | PartNode CLOSENODE { driver.close_node(); }


%%


void  QIlib::lispLike_Parser::error(const location_type& loc, const std::string &err_message )
{
   std::cerr << "Error: " << err_message << "\n";
}


/* include for access to scanner.yylex */
#include "lispLike_scanner.h"

static int yylex( QIlib::lispLike_Parser::semantic_type *yylval,
       QIlib::lispLike_Scanner  &scanner,
       QIlib::lispLike_Driver   &driver )
{
   return( scanner.yylex(yylval) );
}