diff options
Diffstat (limited to 'net-mgmt/scotty3/files/scotty.c')
-rw-r--r-- | net-mgmt/scotty3/files/scotty.c | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/net-mgmt/scotty3/files/scotty.c b/net-mgmt/scotty3/files/scotty.c new file mode 100644 index 000000000000..375cd2a7529e --- /dev/null +++ b/net-mgmt/scotty3/files/scotty.c @@ -0,0 +1,27 @@ +/* All that's needed for bin/scotty, really... -mi */ + +#include "tnmInt.h" + +static int +Tcl_AppInit(interp) + Tcl_Interp *interp; +{ + if (Tcl_Init(interp) != TCL_OK) { + return TCL_ERROR; + } + + if (Tcl_PkgRequire(interp, "Tnm", TNM_VERSION, 1) == NULL) { + return TCL_ERROR; + } + + Tcl_SetVar(interp, "tcl_rcFileName", "~/.tclshrc", TCL_GLOBAL_ONLY); + return TCL_OK; +} + +int +main(argc, argv) + int argc; + char **argv; +{ + Tcl_Main(argc, argv, Tcl_AppInit); +} |