diff options
| author | lecoanet | 2006-09-15 08:05:49 +0000 |
|---|---|---|
| committer | lecoanet | 2006-09-15 08:05:49 +0000 |
| commit | 7f2f93d14f82465b0f5d8e6b3ee070e217a8c0fc (patch) | |
| tree | d838eeaa7174882933ead4dd743b88453730f8d9 /generic/tkZinc.c | |
| parent | 3003f848974d431c6a8b75cb6fbc41ef7db65de5 (diff) | |
| download | tkzinc-7f2f93d14f82465b0f5d8e6b3ee070e217a8c0fc.zip tkzinc-7f2f93d14f82465b0f5d8e6b3ee070e217a8c0fc.tar.gz tkzinc-7f2f93d14f82465b0f5d8e6b3ee070e217a8c0fc.tar.bz2 tkzinc-7f2f93d14f82465b0f5d8e6b3ee070e217a8c0fc.tar.xz | |
Added an init entry point for safe interpreters. Useful when loading in
the Tcl Plugin. Untested.
Diffstat (limited to 'generic/tkZinc.c')
| -rw-r--r-- | generic/tkZinc.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/tkZinc.c b/generic/tkZinc.c index 9a49cb6..9b9dca1 100644 --- a/generic/tkZinc.c +++ b/generic/tkZinc.c @@ -9098,6 +9098,12 @@ Tkzinc_Init(Tcl_Interp *interp) /* Used for error reporting. */ } EXTERN int +Tkzinc_SafeInit(Tcl_Interp *interp) /* Used for error reporting. */ +{ + return Tkzinc_Init(interp); +} + +EXTERN int Tkzinc_debug_Init(Tcl_Interp *interp) /* Used for error reporting. */ { return Tkzinc_Init(interp); |