src/ozulis/ast/clone.cc

   1 #include <ozulis/core/assert.hh>
   2 #include <ozulis/ast/ast.hh>
   3 #include "clone.hh"
   4
   5 namespace ozulis
   6 {
   7   namespace ast
   8   {
   9 #define NB_ENTRIES 100
  10
  11     typedef Node * (*clone_f)(const Node * node);
  12     static clone_f cloneTable_g[NB_ENTRIES] = { 0 };
  13     static bool init_g = true;
  14
  15     static Node * cloneRegisterAddress(const RegisterAddress * node)
  16     {
  17       RegisterAddress * r = new RegisterAddress;
  18
  19       r->name = node->name;
  20       return r;
  21     }
  22
  23     static Node * cloneSymbol(const Symbol * node)
  24     {
  25       Symbol * s = new Symbol;
  26
  27       s->name = node->name;
  28       s->address = clone(node->address);
  29       s->type = node->type; /* type will not change */
  30       return s;
  31     }
  32
  33     static void cloneInit()
  34     {
  35       init_g = false;
  36
  37 #define ADD_ENTRY(Type)                                                 \
  38       do                                                                \
  39         cloneTable_g[Type::nodeTypeId()] = (clone_f)clone##Type;        \
  40       while (0)
  41
  42       ADD_ENTRY(RegisterAddress);
  43       ADD_ENTRY(Symbol);
  44     }
  45
  46     Node * clone(const Node * node)
  47     {
  48       if (init_g)
  49         cloneInit();
  50
  51       return (cloneTable_g[node->nodeType])(node);
  52     }
  53   }
  54 }