module-tclpgin.cc File Reference

#include "mbconfig.h"
#include <cmath>
#include <cfloat>
#include "dataman.h"
#include "constltp.h"
#include <tcl.h>

Include dependency graph for module-tclpgin.cc:

Go to the source code of this file.

Classes
class	TclPlugIn

Functions
static MathParser::PlugIn *	tcl_plugin (MathParser &mp, void *arg)
int	module_init (const char *module_name, void *pdm, void *php)
	This function registers our user defined element for the math parser. More...

Variables
static Tcl_Interp *	interp
static int	interp_cnt

Function Documentation

int module_init	(	const char *	module_name,
		void *	pdm,
		void *	php
	)

This function registers our user defined element for the math parser.

It is called when the "module load" statement appears in the input file.

Definition at line 219 of file module-tclpgin.cc.

References HighParser::GetMathParser(), pHP, MathParser::RegisterPlugIn(), and tcl_plugin().

{
#if 0
        DataManager     *pDM = (DataManager *)pdm;
#endif
        MBDynParser     *pHP = (MBDynParser *)php;

        pHP->GetMathParser().RegisterPlugIn("tcl", tcl_plugin, 0);

        return 0;
}

Here is the call graph for this function:

static MathParser::PlugIn* tcl_plugin ( MathParser &  mp, void *  arg  )

static

Definition at line 209 of file module-tclpgin.cc.

References SAFENEWWITHCONSTRUCTOR.

Referenced by module_init().

{
        MathParser::PlugIn *p = 0;
        
        SAFENEWWITHCONSTRUCTOR(p, TclPlugIn, TclPlugIn(mp));

        return p;
}

Variable Documentation

Tcl_Interp* interp

static

Definition at line 43 of file module-tclpgin.cc.

Referenced by TclPlugIn::GetVal(), TclPlugIn::TclPlugIn(), and TclPlugIn::~TclPlugIn().

int interp_cnt

static

Definition at line 44 of file module-tclpgin.cc.