fixed Tornado II build

This commit is contained in:
Jeff Hill
2000-05-24 21:52:02 +00:00
parent ed6b736a89
commit dd24055ea8
3 changed files with 19 additions and 4 deletions

View File

@@ -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)

View File

@@ -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);
}

View File

@@ -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;