---

cw_iscanner_spec.cc

Go to the documentation of this file.

/*
 *  File:       cw_iscanner_spec.cc
 *              $Id: cw_iscanner_spec.cc,v 1.4 2002/05/08 10:34:39 alec Exp $
 *
 *  Author:     Alec Panoviciu (alecu@email.com)
 *
 *  Comments:
 *
 *  Revision history:
 *
 *  $Log: cw_iscanner_spec.cc,v $
 *  Revision 1.4  2002/05/08 10:34:39  alec
 *  added keyword tokens support
 *
 *  Revision 1.3  2002/05/07 10:02:18  alec
 *  fixed some bugs & mem leaks; added MORE tokens support
 *
 *  Revision 1.2  2002/04/29 17:55:41  alec
 *  regexps almost done
 *
 *  Revision 1.1  2002/04/29 09:40:00  alec
 *  *** empty log message ***
 *
 */

/* 
  Copyright (C) 2002 Alexandru Panoviciu (alecu@email.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 2 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, write to the Free Software
  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

 */

#include "debug.h"
#include "cw_iscanner_spec.h"
#include "iscanner_spec.hh"
#include "re_node.hh"

IScannerSpec* cw_scannerSpec = NULL;


CLINK void IScannerSpec_addRegToken (CstringList states_,
                                     char *name_, void *regexp_,
                                     char *tokenAction_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  if (tokenAction_ == NULL) tokenAction_ = "";
  vector<string> *states = CstringList2vector(states_);
  
  try {
    cw_scannerSpec->addRegToken(*states, string(name_),
                                static_cast<ReNode*>(regexp_),
                                string(tokenAction_), Position(yylineno));
  } catch (ParseException &ex) {
    die(formatError(Position(yylineno), ex));
  }
  delete states;
}


CLINK void IScannerSpec_addSkipToken (CstringList states_,
                                      char *name_, void *regexp_,
                                      char *tokenAction_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  if (tokenAction_ == NULL) tokenAction_ = "";
  vector<string> *states = CstringList2vector(states_);
  
  try {
    cw_scannerSpec->addSkipToken(*states, string(name_),
                                 static_cast<ReNode*>(regexp_),
                                 string(tokenAction_), Position(yylineno));
  } catch (ParseException &ex) {
    die(formatError(Position(yylineno), ex));
  }
  delete(states);
}


CLINK void IScannerSpec_addMoreToken (CstringList states_,
                                      char *name_, void *regexp_,
                                      char *tokenAction_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  if (tokenAction_ == NULL) tokenAction_ = "";
  vector<string> *states = CstringList2vector(states_);
  
  try {
    cw_scannerSpec->addMoreToken(*states, string(name_),
                                 static_cast<ReNode*>(regexp_),
                                 string(tokenAction_), Position(yylineno));
  } catch (ParseException &ex) {
    die(formatError(Position(yylineno), ex));
  }
  delete(states);
}


CLINK void IScannerSpec_addKeywordToken (CstringList states_,
                                         char *name_, void *regexp_,
                                         char *tokenAction_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  if (tokenAction_ == NULL) tokenAction_ = "";
  vector<string> *states = CstringList2vector(states_);
  
  try {
    cw_scannerSpec->addKeywordToken(*states, string(name_),
                                    static_cast<ReNode*>(regexp_),
                                    string(tokenAction_), Position(yylineno));
  } catch (ParseException &ex) {
    die(formatError(Position(yylineno), ex));
  }
  delete(states);
}


CLINK void IScannerSpec_addSpecialToken (char *name_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  try {
    cw_scannerSpec->addSpecialToken(string(name_), Position(yylineno));
  } catch (ParseException &ex) {
    die(formatError(Position(yylineno), ex));
  }
}


CLINK void IScannerSpec_setPreambleCode (char *block_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  cw_scannerSpec->setPreambleCode(string(block_), Position(yylineno));
}

CLINK void IScannerSpec_addCodeBlock (char *block_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  cw_scannerSpec->addCodeBlock(string(block_), Position(yylineno));
}


CLINK void IScannerSpec_setInheritance (char *inheritance_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  cw_scannerSpec->setInheritance(string(inheritance_), Position(yylineno));
}


CLINK void IScannerSpec_setClassName (char *className_)
{
  ASSERT(cw_scannerSpec != NULL, "cw_scannerSpec not initialized !");

  cw_scannerSpec->setClassName(string(className_));
}

---