fixed Tornado II build
This commit is contained in:
@@ -52,7 +52,7 @@ GCC_RANLIB =
|
||||
#--------------------------------------------------
|
||||
# C++ host processing
|
||||
NM = $(GNU_BIN)/$(CMPLR_PREFIX)nm$(CMPLR_SUFFIX)$(HOSTEXE)
|
||||
ifneq ($(wildcard $(GNU_BIN)/munch.tcl),)
|
||||
ifeq ($(wildcard $(GNU_BIN)/munch.tcl),$(wildcard $(GNU_BIN)/munch.tcl))
|
||||
##ifeq ($(wildcard $(GNU_BIN)/$(CMPLR_PREFIX)munch$(HOSTEXE)),)
|
||||
#tornado2
|
||||
export WIND_BASE = $(VX_DIR)
|
||||
|
||||
@@ -28,7 +28,7 @@ static void runScriptCallFunc(ioccrfArg **args)
|
||||
}
|
||||
|
||||
/* chdir */
|
||||
static ioccrfArg chdirArg0 = { "directory name",ioccrfArgString,0};
|
||||
static ioccrfArg chdirArg0 = { "current directory name",ioccrfArgString,0};
|
||||
static ioccrfArg *chdirArgs[1] = {&chdirArg0};
|
||||
static ioccrfFuncDef chdirFuncDef = {"cd",1,chdirArgs};
|
||||
static void chdirCallFunc(ioccrfArg **args)
|
||||
@@ -36,6 +36,17 @@ static void chdirCallFunc(ioccrfArg **args)
|
||||
chdir((char *)args[0]->value);
|
||||
}
|
||||
|
||||
/* print current working directory */
|
||||
static ioccrfFuncDef pwdFuncDef = { "pwd", 0, 0 };
|
||||
static void pwdCallFunc (ioccrfArg **args)
|
||||
{
|
||||
char buf[256];
|
||||
char *pwd = getcwd ( buf, sizeof(buf) - 1 );
|
||||
if ( pwd ) {
|
||||
printf ( "%s\n", pwd );
|
||||
}
|
||||
}
|
||||
|
||||
/* show (thread information) */
|
||||
static ioccrfArg showArg0 = { "task",ioccrfArgString,0};
|
||||
static ioccrfArg showArg1 = { "task",ioccrfArgString,0};
|
||||
@@ -106,6 +117,7 @@ void epicsShareAPI iocUtilRegister(void)
|
||||
{
|
||||
ioccrfRegister(&runScriptFuncDef,runScriptCallFunc);
|
||||
ioccrfRegister(&chdirFuncDef,chdirCallFunc);
|
||||
ioccrfRegister(&pwdFuncDef,pwdCallFunc);
|
||||
ioccrfRegister(&showFuncDef,showCallFunc);
|
||||
ioccrfRegister(&threadInitFuncDef,threadInitCallFunc);
|
||||
}
|
||||
|
||||
@@ -374,9 +374,12 @@ ioccrf (const char *pathname)
|
||||
pioccrfArg = pioccrfFuncDef->arg[arg];
|
||||
if (!pargvalue) {
|
||||
pargvalue = callocMustSucceed(1, sizeof(argvalue), "ioccrf");
|
||||
if(prevargvalue)
|
||||
if ( prevargvalue ) {
|
||||
prevargvalue->next = pargvalue;
|
||||
argvalueHead = pargvalue;
|
||||
}
|
||||
else {
|
||||
argvalueHead = pargvalue;
|
||||
}
|
||||
}
|
||||
if (!cvtArg (filename, lineno, p, pargvalue, pioccrfArg))
|
||||
break;
|
||||
|
||||
Reference in New Issue
Block a user