-- Output a C++ statement that creates the given name
function name_to_cpp_expr(n)
   function rec(n)
      if not n:is_atomic() then
         rec(n:get_prefix())
         io.write(", ")
      end
      if n:is_string() then
         io.write("\"" .. n:get_string() .. "\"")
      else
         error("numeral hierarchical names are not supported in the C++ interface: " .. tostring(n))
      end
   end

   io.write("name(")
   if n:is_atomic() then
      rec(n)
   else
      io.write("{")
      rec(n)
      io.write("}")
   end
   io.write(")")
end

-- Output a C++ constant name based on the given hierarchical name
-- It uses '_' to glue the hierarchical name parts
function name_to_cpp_decl(n)
   if not n:is_atomic(n) then
      name_to_cpp_decl(n:get_prefix())
      io.write("_")
   end
   if n:is_string() then
      io.write(n:get_string())
   else
      error("numeral hierarchical names are not supported in the C++ interface: " .. tostring(n))
   end
end