50 lines
1.2 KiB
C#
50 lines
1.2 KiB
C#
using System;
|
|
using System.Collections.Generic;
|
|
using System.Text;
|
|
|
|
namespace VisualPascalABC
|
|
{
|
|
class RuntimeException: PascalABCCompiler.Errors.LocatedError
|
|
{
|
|
string message;
|
|
public RuntimeException(string Message, string FileName, int ColNumber, int LineNumber)
|
|
{
|
|
this.fileName = FileName;
|
|
this.message = Message;
|
|
sourceLocation = new PascalABCCompiler.SourceLocation(fileName, LineNumber, ColNumber, LineNumber, ColNumber);
|
|
}
|
|
public override string Message
|
|
{
|
|
get
|
|
{
|
|
return ToString();
|
|
}
|
|
}
|
|
public override string ToString()
|
|
{
|
|
return message;
|
|
}
|
|
|
|
}
|
|
class ExceptionInStartEXE : PascalABCCompiler.Errors.LocatedError
|
|
{
|
|
public ExceptionInStartEXE(string FileName)
|
|
{
|
|
this.fileName = FileName;
|
|
sourceLocation = null;
|
|
}
|
|
public override string Message
|
|
{
|
|
get
|
|
{
|
|
return ToString();
|
|
}
|
|
}
|
|
public override string ToString()
|
|
{
|
|
return string.Format(Form1StringResources.Get("EXCEPTION_IN_START_EXE{0}"), fileName);
|
|
}
|
|
|
|
}
|
|
}
|