grino/lib/core.cpp

#include "../src/Loader.hpp"
#include "src/Logger.hpp"

GRINO_ERROR(assertion_error);

extern "C" void lib(grino::Loader& loader)
{
  loader.add_native("dump", [](auto args){
    std::string sep;
    std::stringstream ss;

    for (auto arg: args)
      {
        ss << sep << arg->string();
        sep = " ";
      }

    std::cout << ss.str() << std::endl;

    return grino::Value::make_nil(args.back()->loc());
  });

  loader.add_native("assert", [](auto args){

    for (auto value: args)
      {
        if (!value->as_bool())
          {
            grino::Logger logger;
            logger.log<assertion_error>(grino::LOG_ASSERT,
                                        value->loc(),
                                        "assertion failed");
          }
      }

    return grino::Value::make_bool(args.front()->loc(), true);
  });
}