aboutsummaryrefslogtreecommitdiffstats
path: root/Plugins/ScriptingTcl/scriptingtcl.h
diff options
context:
space:
mode:
authorLibravatarUnit 193 <unit193@unit193.net>2023-04-30 18:31:18 -0400
committerLibravatarUnit 193 <unit193@unit193.net>2023-04-30 18:31:18 -0400
commit4de57f628bc74f00ba1885e91c84ea07c5405d8f (patch)
tree5d91900751e826d491ff1b2ebc571a787e84f864 /Plugins/ScriptingTcl/scriptingtcl.h
parent74d881cefa9097e58e129e37b9c44d680d8c7dfe (diff)
parent3565aad630864ecdbe53fdaa501ea708555b3c7c (diff)
Update upstream source from tag 'upstream/3.4.4+dfsg'
Update to upstream version '3.4.4+dfsg' with Debian dir 482614bd23f0ef52dabc9803477204ad88e917ed
Diffstat (limited to 'Plugins/ScriptingTcl/scriptingtcl.h')
-rw-r--r--Plugins/ScriptingTcl/scriptingtcl.h9
1 files changed, 6 insertions, 3 deletions
diff --git a/Plugins/ScriptingTcl/scriptingtcl.h b/Plugins/ScriptingTcl/scriptingtcl.h
index f853f07..eb81540 100644
--- a/Plugins/ScriptingTcl/scriptingtcl.h
+++ b/Plugins/ScriptingTcl/scriptingtcl.h
@@ -32,8 +32,10 @@ class SCRIPTINGTCLSHARED_EXPORT ScriptingTcl : public GenericPlugin, public DbAw
bool hasError(Context* context) const;
QString getErrorMessage(Context* context) const;
QString getIconPath() const;
- QVariant evaluate(Context* context, const QString& code, const QList<QVariant>& args, Db* db, bool locking = false);
- QVariant evaluate(const QString& code, const QList<QVariant>& args, Db* db, bool locking = false, QString* errorMessage = nullptr);
+ QVariant evaluate(Context* context, const QString& code, const FunctionInfo& funcInfo,
+ const QList<QVariant>& args, Db* db, bool locking = false);
+ QVariant evaluate(const QString& code, const FunctionInfo& funcInfo, const QList<QVariant>& args,
+ Db* db, bool locking = false, QString* errorMessage = nullptr);
private:
class ScriptObject
@@ -82,9 +84,10 @@ class SCRIPTINGTCLSHARED_EXPORT ScriptingTcl : public GenericPlugin, public DbAw
};
ContextTcl* getContext(ScriptingPlugin::Context* context) const;
- QVariant compileAndEval(ContextTcl* ctx, const QString& code, Db* db, bool locking);
+ QVariant compileAndEval(ContextTcl* ctx, const QString& code, const FunctionInfo& funcInfo, const QList<QVariant>& args, Db* db, bool locking);
QVariant extractResult(ContextTcl* ctx);
void setArgs(ContextTcl* ctx, const QList<QVariant>& args);
+ ScriptObject* getScript(const QString code, const FunctionInfo& funcInfo, ContextTcl* ctx);
static Tcl_Obj* argsToList(const QList<QVariant>& args);
static QVariant tclObjToVariant(Tcl_Obj* obj);