You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
openmw-tes3mp/old_d_version/monster/vm/error.d

70 lines
1.6 KiB
D

/*
Monster - an advanced game scripting language
Copyright (C) 2007-2009 Nicolay Korslund
Email: <korslund@gmail.com>
WWW: http://monster.snaptoad.com/
This file (error.d) is part of the Monster script language
package.
Monster is distributed as free software: you can redistribute it
and/or modify it under the terms of the GNU General Public License
version 3, as published by the Free Software Foundation.
This program is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
General Public License for more details.
You should have received a copy of the GNU General Public License
version 3 along with this program. If not, see
http://www.gnu.org/licenses/ .
*/
module monster.vm.error;
import monster.compiler.tokenizer;
version(Tango) import tango.core.Exception;
import std.string;
class MonsterException : Exception
{
this(char[] msg) { super(/*"MonsterException: " ~*/ msg); }
}
// Source file location
struct Floc
{
int line = -1;
char[] fname;
char[] toString() { return format("%s:%s", fname, line); }
}
void fail(char[] msg, Floc loc)
{
fail(msg, loc.fname, loc.line);
}
void fail(char[] msg, char[] fname, int line)
{
if(line != -1)
fail(format("%s:%s: %s", fname, line, msg));
else
fail(msg);
}
void fail(char[] msg)
{
throw new MonsterException(msg);
}
void fail(char[] msg, TokenArray toks)
{
if(toks.length)
fail(msg ~ ", found " ~ toks[0].str, toks[0].loc);
else
fail(msg ~ ", found end of file");
}