wasCSharpSQLite – Rev 1
?pathlinks?
/*
* TclNumArgsException.java
*
* Copyright (c) 1997 Sun Microsystems, Inc.
*
* See the file "license.terms" for information on usage and
* redistribution of this file, and for a DISCLAIMER OF ALL
* WARRANTIES.
*
* Included in SQLite3 port to C# for use in testharness only; 2008 Noah B Hart
*
* RCS @(#) $Id: TclVarException.java,v 1.1.1.1 1998/10/14 21:09:19 cvsadmin Exp $
*
*/
using System;
namespace tcl.lang
{
/// <summary> This exception is used to report variable errors in Tcl.</summary>
class TclVarException : TclException
{
/// <summary> Creates an exception with the appropiate Tcl error message to
/// indicate an error with variable access.
///
/// </summary>
/// <param name="interp">currrent interpreter.
/// </param>
/// <param name="name1">first part of a variable name.
/// </param>
/// <param name="name2">second part of a variable name. May be null.
/// </param>
/// <param name="operation">either "read" or "set".
/// </param>
/// <param name="reason">a string message to explain why the operation fails..
/// </param>
internal TclVarException( Interp interp, string name1, string name2, string operation, string reason )
: base( TCL.CompletionCode.ERROR )
{
if ( interp != null )
{
interp.resetResult();
if ( (System.Object)name2 == null )
{
interp.setResult( "can't " + operation + " \"" + name1 + "\": " + reason );
}
else
{
interp.setResult( "can't " + operation + " \"" + name1 + "(" + name2 + ")\": " + reason );
}
}
}
}
}