Main Page | Namespace List | Class Hierarchy | Alphabetical List | Compound List | File List | Compound Members | File Members

ns_tclsh.cc File Reference

#include <stdio.h>
#include "config.h"

Include dependency graph for ns_tclsh.cc:

Include dependency graph

Go to the source code of this file.

Functions

 init_misc ()
int Tcl_AppInit (Tcl_Interp *interp)
int main (int argc, char **argv)

Function Documentation

init_misc (   ) 
 

Definition at line 228 of file misc.cc.

Referenced by Tcl_AppInit(). 

00229 {
00230         (void)new VersionCommand;
00231         (void)new RandomCommand;
00232         (void)new TimeAtofCommand;
00233         (void)new HasInt64Command;
00234         (void)new HasSTLCommand;
00235 #if defined(HAVE_INT64)
00236         (void)new Add64Command;
00237         (void)new Mult64Command;
00238         (void)new Int64ToDoubleCommand;
00239 #endif
00240 }

int main (  int  argc,
char **  argv
) 
 

Definition at line 50 of file ns_tclsh.cc.

References Tcl_AppInit(). 

00051 {
00052     Tcl_Main(argc, argv, Tcl_AppInit);
00053     return 0;                   /* Needed only to prevent compiler warning. */
00054 }

Here is the call graph for this function:

int Tcl_AppInit (  Tcl_Interp *  interp  ) 
 

Definition at line 34 of file ns_tclsh.cc.

References et_ns_lib, init(), and init_misc(). 

00035 {
00036         if (Tcl_Init(interp) == TCL_ERROR ||
00037             Otcl_Init(interp) == TCL_ERROR)
00038                 return TCL_ERROR;
00039 
00040         Tcl_SetVar(interp, "tcl_rcFileName", "~/.ns.tcl", TCL_GLOBAL_ONLY);
00041         Tcl::init(interp, "ns");
00042         extern EmbeddedTcl et_ns_lib;
00043         et_ns_lib.load();
00044         init_misc();
00045 
00046         return (TCL_OK);
00047 }

Here is the call graph for this function:

Generated on Tue Apr 20 12:23:46 2004 for NS2.26SourcesOriginal by doxygen 1.3.3