ns2 Network Simulator C++ Class Hierarchy of version ns-snapshot-20040722 | |
| Home | Source Code | Manual | FAQ | Mailing List Archive | Search | | | Download | |
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdarg.h>
#include <ctype.h>
#include <tcl.h>
#include "tclcl.h"
#include "tclcl-config.h"
#include "tclcl-internal.h"
#include <sys/types.h>
#include <assert.h>
#include "tracedvar.h"
#include <tk.h>
Compounds | |
class | InstVar |
class | InstVarBandwidth |
class | InstVarBool |
class | InstVarError |
class | InstVarInt |
class | InstVarReal |
class | InstVarTclObject |
class | InstVarTime |
class | InstVarTracedInt |
class | InstVarTracedReal |
class | InstVarUInt |
class | TracedVarTcl |
Defines | |
#define | MAX_CODE_TO_DUMP (8*1024) |
#define | WRK_SMALL_SIZE 32 |
#define | WRK_MEDIUM_SIZE 256 |
#define | TOB(FUNCTION, C_TYPE, INSTVAR_TYPE, OTHER_STUFF) |
#define | TODB(FUNCTION, C_TYPE, INSTVAR_TYPE, TRACEDVAR_CODE) |
Functions | |
TOB (bind, TracedInt, InstVarTracedInt, val->name(var);val->owner(this);) TOB(bind | |
val | name (var) |
val | owner (this) |
TODB (delay_bind, double, InstVarReal, not_a_TracedVar(thisVarName)) TODB(delay_bind_bw | |
not_a_TracedVar (thisVarName)) TODB(delay_bind_time | |
unsigned | handle_TracedVar (thisVarName, val, tracer)) TODB(delay_bind |
Variables | |
const char | rcsid [] |
EmbeddedTcl | et_tclobject |
TracedDouble | |
InstVarTracedReal | |
double | |
InstVarBandwidth | |
InstVarTime | |
int | |
InstVarInt | |
unsigned | InstVarUInt |
unsigned | InstVarBool |
unsigned | TracedInt |
unsigned | InstVarTracedInt |
|
|
|
Value: void TclObject::FUNCTION(const char* var, C_TYPE* val) \ { \ create_instvar(var); \ OTHER_STUFF; \ init(new INSTVAR_TYPE(var, val), var); \ } |
|
Value: bool \ TclObject:: FUNCTION (const char* varName, const char* localName, \ const char* thisVarName, \ C_TYPE *val, TclObject *tracer) \ { \ if (strcmp(varName, thisVarName) != 0) return false; \ if (tracer) { \ \ TRACEDVAR_CODE; \ } else { \ \ if (TCL_OK != create_framevar(localName)) abort(); \ (void) (new INSTVAR_TYPE (localName, val)); \ }; \ return true; \ } |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Initial value:
"@(#) $Header: /cvsroot/otcl-tclcl/tclcl/Tcl.cc,v 1.71 2002/07/17 21:15:50 heidemann Exp $ (LBL)"
|
|
|
|
|