lib-src/automata/fastac.cc

   1 //////////////////////////////////////////////////////////////////////////////
   2 // NOTICE:
   3 //
   4 // ADLib, Prop and their related set of tools and documentation are in the
   5 // public domain.   The author(s) of this software reserve no copyrights on
   6 // the source code and any code generated using the tools.  You are encouraged
   7 // to use ADLib and Prop to develop software, in both academic and commercial
   8 // settings, and are free to incorporate any part of ADLib and Prop into
   9 // your programs.
  10 //
  11 // Although you are under no obligation to do so, we strongly recommend that
  12 // you give away all software developed using our tools.
  13 //
  14 // We also ask that credit be given to us when ADLib and/or Prop are used in
  15 // your programs, and that this notice be preserved intact in all the source
  16 // code.
  17 //
  18 // This software is still under development and we welcome any suggestions
  19 // and help from the users.
  20 //
  21 // Allen Leung
  22 // 1994
  23 //////////////////////////////////////////////////////////////////////////////
  24
  25 #include <AD/automata/acgen.h>
  26
  27 void ACGen::gen_fast_automaton(std::ostream& out, const char class_name[]) const
  28 {
  29    out << "class " << class_name
  30        << " : public FastAC {\npublic:\n"
  31        << "   State go(register State s, register Symbol c) const\n";
  32
  33    out << "   {  for (;;) {\n         switch(s) {\n";
  34    register State s;
  35    register Symbol c;
  36
  37    for (s = 0; s < number_of_states; s++) {
  38       register Offset offset = base[s];
  39       out << "            case " << s << ": L_" << s << ": switch(c) {\n";
  40       for (c = min_symbol; c <= max_symbol; c++) {
  41          if (check[offset + c] == s) {
  42             out << "               case " << c << ": return "
  43                 << next[offset + c] << ";\n";
  44          }
  45       }
  46       out << "               default: goto L_" << epsilon[s] << ";\n"
  47           << "            }\n";
  48    }
  49
  50    out << "         }\n      }\n   }\n};\n";
  51 }