diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-07-17 13:57:23 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-07-17 13:57:23 (GMT) |
| commit | 6d2beac7e80048bcc4d4d46c68ec4f55d90986b3 (patch) | |
| tree | faf878da5bac9463e56a9537afeb4aaa54b84309 /generic/tclCompile.h | |
| parent | 945323c68b1aaa265a1467ae1d1101a618e871a9 (diff) | |
| download | tcl-6d2beac7e80048bcc4d4d46c68ec4f55d90986b3.zip tcl-6d2beac7e80048bcc4d4d46c68ec4f55d90986b3.tar.gz tcl-6d2beac7e80048bcc4d4d46c68ec4f55d90986b3.tar.bz2 | |
Factor out the call to a compileProc into one place used by both ensemble
subcommand compiles and toplevel command compiles in TclCompileScript.
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index f70f8f7..56315db 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -984,6 +984,9 @@ MODULE_SCOPE ByteCode * TclCompileObj(Tcl_Interp *interp, Tcl_Obj *objPtr, *---------------------------------------------------------------- */ +MODULE_SCOPE int TclAttemptCompileProc(Tcl_Interp *interp, + Tcl_Parse *parsePtr, int depth, Command *cmdPtr, + CompileEnv *envPtr); MODULE_SCOPE void TclCleanupByteCode(ByteCode *codePtr); MODULE_SCOPE void TclCleanupStackForBreakContinue(CompileEnv *envPtr, ExceptionAux *auxPtr); |