FArray.cpp

#include <iostream>
#include <stdexcept>
#include <sstream>

#include <stk_util/diag/FArray.hpp>
#include <stk_util/diag/StringUtil.hpp>

namespace sierra {

// Force inclusion of array_dimension_error by linker
FArrayBootstrap::~FArrayBootstrap()
{
  static void (*array_dimension_error_bootstrap)(const std::type_info &typeinfo, unsigned dimension, unsigned value, unsigned upper) = array_dimension_error;

  (void) array_dimension_error_bootstrap; // suppress compiler warning for unused variable
}

namespace {

const char *ordinal[] = {"first", "second", "third", "fourth", "fifth", "sixth", "seventh", "eight"};

} // namespace <unnamed>


void
array_dimension_error(
  const std::type_info &  type,
  unsigned      dimension,
  unsigned      value,
  unsigned      upper)
{
  std::ostringstream os ;
  os << demangle(type.name()) << " ";
  if (dimension > sizeof(ordinal)/sizeof(ordinal[0]))
    os << dimension;
  else
    os << ordinal[dimension];
  os << " dimension value " << value
     << " is out of bounds (0:" << upper - 1 << ")";

  throw std::range_error(os.str().c_str());
}

} // namespace sierra