| [25] | 1 | '\" |
|---|
| 2 | '\" Copyright (c) 1995-1996 Sun Microsystems, Inc. |
|---|
| 3 | '\" |
|---|
| 4 | '\" See the file "license.terms" for information on usage and redistribution |
|---|
| 5 | '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. |
|---|
| 6 | '\" |
|---|
| 7 | '\" RCS: @(#) $Id: StaticPkg.3,v 1.9 2007/12/13 15:22:32 dgp Exp $ |
|---|
| 8 | '\" |
|---|
| 9 | .so man.macros |
|---|
| 10 | .TH Tcl_StaticPackage 3 7.5 Tcl "Tcl Library Procedures" |
|---|
| 11 | .BS |
|---|
| 12 | .SH NAME |
|---|
| 13 | Tcl_StaticPackage \- make a statically linked package available via the 'load' command |
|---|
| 14 | .SH SYNOPSIS |
|---|
| 15 | .nf |
|---|
| 16 | \fB#include <tcl.h>\fR |
|---|
| 17 | .sp |
|---|
| 18 | \fBTcl_StaticPackage\fR(\fIinterp, pkgName, initProc, safeInitProc\fR) |
|---|
| 19 | .SH ARGUMENTS |
|---|
| 20 | .AS Tcl_PackageInitProc *safeInitProc |
|---|
| 21 | .AP Tcl_Interp *interp in |
|---|
| 22 | If not NULL, points to an interpreter into which the package has |
|---|
| 23 | already been loaded (i.e., the caller has already invoked the |
|---|
| 24 | appropriate initialization procedure). NULL means the package |
|---|
| 25 | has not yet been incorporated into any interpreter. |
|---|
| 26 | .AP "const char" *pkgName in |
|---|
| 27 | Name of the package; should be properly capitalized (first letter |
|---|
| 28 | upper-case, all others lower-case). |
|---|
| 29 | .AP Tcl_PackageInitProc *initProc in |
|---|
| 30 | Procedure to invoke to incorporate this package into a trusted |
|---|
| 31 | interpreter. |
|---|
| 32 | .AP Tcl_PackageInitProc *safeInitProc in |
|---|
| 33 | Procedure to call to incorporate this package into a safe interpreter |
|---|
| 34 | (one that will execute untrusted scripts). NULL means the package |
|---|
| 35 | cannot be used in safe interpreters. |
|---|
| 36 | .BE |
|---|
| 37 | |
|---|
| 38 | .SH DESCRIPTION |
|---|
| 39 | .PP |
|---|
| 40 | This procedure may be invoked to announce that a package has been |
|---|
| 41 | linked statically with a Tcl application and, optionally, that it |
|---|
| 42 | has already been loaded into an interpreter. |
|---|
| 43 | Once \fBTcl_StaticPackage\fR has been invoked for a package, it |
|---|
| 44 | may be loaded into interpreters using the \fBload\fR command. |
|---|
| 45 | \fBTcl_StaticPackage\fR is normally invoked only by the \fBTcl_AppInit\fR |
|---|
| 46 | procedure for the application, not by packages for themselves |
|---|
| 47 | (\fBTcl_StaticPackage\fR should only be invoked for statically |
|---|
| 48 | loaded packages, and code in the package itself should not need |
|---|
| 49 | to know whether the package is dynamically or statically loaded). |
|---|
| 50 | .PP |
|---|
| 51 | When the \fBload\fR command is used later to load the package into |
|---|
| 52 | an interpreter, one of \fIinitProc\fR and \fIsafeInitProc\fR will |
|---|
| 53 | be invoked, depending on whether the target interpreter is safe |
|---|
| 54 | or not. |
|---|
| 55 | \fIinitProc\fR and \fIsafeInitProc\fR must both match the |
|---|
| 56 | following prototype: |
|---|
| 57 | .CS |
|---|
| 58 | typedef int Tcl_PackageInitProc(Tcl_Interp *\fIinterp\fR); |
|---|
| 59 | .CE |
|---|
| 60 | The \fIinterp\fR argument identifies the interpreter in which the package |
|---|
| 61 | is to be loaded. The initialization procedure must return \fBTCL_OK\fR or |
|---|
| 62 | \fBTCL_ERROR\fR to indicate whether or not it completed successfully; in |
|---|
| 63 | the event of an error it should set the interpreter's result to point to an |
|---|
| 64 | error message. The result or error from the initialization procedure will |
|---|
| 65 | be returned as the result of the \fBload\fR command that caused the |
|---|
| 66 | initialization procedure to be invoked. |
|---|
| 67 | |
|---|
| 68 | .SH KEYWORDS |
|---|
| 69 | initialization procedure, package, static linking |
|---|
