diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-01-02 09:17:07 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-01-02 09:17:07 (GMT) |
| commit | 7d35dc662f87cf8c5b430c248f1da15ba16104b7 (patch) | |
| tree | 84d0a746be1a9189703b8571f3135f6bfd154a73 /generic/tclInt.h | |
| parent | f918716ff4945cac9a2903bde7f3a337fee78c90 (diff) | |
| parent | 1dbca95b72ebb7a627cbd13ebfa12bfa5c1bd9d7 (diff) | |
| download | tcl-7d35dc662f87cf8c5b430c248f1da15ba16104b7.zip tcl-7d35dc662f87cf8c5b430c248f1da15ba16104b7.tar.gz tcl-7d35dc662f87cf8c5b430c248f1da15ba16104b7.tar.bz2 | |
implement TclOO's [next] in bytecode
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 94ee836..f10beae 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2734,6 +2734,7 @@ MODULE_SCOPE Tcl_ObjCmdProc TclNRYieldObjCmd; MODULE_SCOPE Tcl_ObjCmdProc TclNRYieldmObjCmd; MODULE_SCOPE Tcl_ObjCmdProc TclNRYieldToObjCmd; MODULE_SCOPE Tcl_ObjCmdProc TclNRInvoke; +MODULE_SCOPE Tcl_NRPostProc TclOONextRestoreFrame; MODULE_SCOPE void TclSetTailcall(Tcl_Interp *interp, Tcl_Obj *tailcallPtr); MODULE_SCOPE void TclPushTailcallPoint(Tcl_Interp *interp); @@ -3589,6 +3590,9 @@ MODULE_SCOPE int TclCompileNamespaceWhichCmd(Tcl_Interp *interp, MODULE_SCOPE int TclCompileNoOp(Tcl_Interp *interp, Tcl_Parse *parsePtr, Command *cmdPtr, struct CompileEnv *envPtr); +MODULE_SCOPE int TclCompileObjectNextCmd(Tcl_Interp *interp, + Tcl_Parse *parsePtr, Command *cmdPtr, + struct CompileEnv *envPtr); MODULE_SCOPE int TclCompileObjectSelfCmd(Tcl_Interp *interp, Tcl_Parse *parsePtr, Command *cmdPtr, struct CompileEnv *envPtr); |