view interps/sadol/pch.cpp @ 8497:2c419f225667

<izabera> ` echo \'for file do mapfile -t lines < "$file"; for (( i = ${#lines[@]} -1; i >= 0; i-- )) do printf "%s\\n" "${lines[i]}"; done done\' >> bin/tac
author HackBot
date Thu, 16 Jun 2016 09:40:02 +0000
parents 859f9b4339e6
children
line wrap: on
line source

/*
 * BDSM2
 * Author: Adam Sawicki
 * http://www.regedit.risp.pl
 * mailto:regedit@risp.pl
 */
/* Precompiled header */
#include "pch.hpp"
#include <iostream>

void Error(const string &Msg, ERR_PLACE Place)
{
	string s;
	switch (Place)
	{
	case ERR_PARSE:
		s = "Parsing: ";
		break;
	case ERR_OPTIMIZE:
		s = "Optimizing: ";
		break;
	case ERR_EXECUTE:
		s = "Executing: ";
		break;
	case ERR_IO:
		s = "IO: ";
		break;
	}
	std::cerr << "BDSM: " << s << Msg << std::endl;

	exit(ERR_GENERAL);
}