stage3/datatype_functions.cc
changeset 778 44e02a88f1e7
parent 693 51a2fa6441b9
equal deleted inserted replaced
777:e74a882c8d22 778:44e02a88f1e7
    25 #include "datatype_functions.hh"
    25 #include "datatype_functions.hh"
    26 #include "../absyntax_utils/absyntax_utils.hh"
    26 #include "../absyntax_utils/absyntax_utils.hh"
    27 #include <vector>
    27 #include <vector>
    28 
    28 
    29 
    29 
    30 
       
    31 
       
    32 
       
    33 
       
    34 elementary_type_c *elementary_type_c::singleton = NULL;
       
    35 
       
    36 const char *elementary_type_c::to_string(symbol_c *symbol) {
       
    37   if (NULL == singleton)    singleton = new elementary_type_c;
       
    38   if (NULL == singleton)    ERROR;
       
    39   const char *res           = (const char *)symbol->accept(*singleton);
       
    40   if (NULL == res)          ERROR;
       
    41   return res;
       
    42 }
       
    43 
    30 
    44 
    31 
    45 
    32 
    46 
    33 
    47 
    34