Verilog-Perl

//#include "My_Parser.h"

#include "VFileLineParseXs.h"

// Entry Point

int main(int argc, char * argv[]) {

  VFileLineParseXs* filelinep = new VFileLineParseXs(NULL);

  av* symsp;

  // open file

  ifstream dut ("files/dut.sv");

  if (dut.is_open()) {

    std::cout << "dut.sv opened correctly" << std::endl;

  } else {

    std::cout << "error while opening dut.sv" << std::endl; return 0;

  }

  ifstream scoreboard ("files/htax_bridge_scoreboard.sv");

  if (scoreboard.is_open()) {

    std::cout << "htax_bridge_scoreboard.sv opened correctly" << std::endl;

  } else {

    std::cout << "error while opening htax_bridge_scoreboard.sv" << std::endl; return 0;

  }

   My_Parser *parser = new My_Parser(filelinep, symsp, 0, 0);

   filelinep->setParser(parser);

  dut.close();

  scoreboard.close();

}