epos.cpp

#include <epos.hpp>
#include <iostream>

namespace epos {

  // this is needed as linker object, but it is not needed to do anything
  void ranfini_(double&, int&, int&) {}

  // this is needed as linker object, but it is not needed to do anything
  void ranfcv_(double&) {} // LCOV_EXCL_LINE

  float rangen_() { return ::epos::rndm_interface(); }
  double drangen_() { return ::epos::double_rndm_interface(); }

  datadir::datadir(const std::string& dir) {
    if (dir.length() > 500) { // we don't test this limitation: LCOV_EXCL_START
      std::cerr << "Epos error, will cut datadir \"" << dir
                << "\" to 500 characters: " << std::endl;
    } // LCOV_EXCL_STOP
    int i = 0;
    for (i = 0; i < std::min(500, int(dir.length())); ++i) data[i] = dir[i];
    data[i + 0] = ' ';
    data[i + 1] = '\0';
    length = dir.length();
  }
} // namespace epos