- Introduced a general Hipadaba table module and modified the four
circle codes to use it. - Added to functions to histmem, getdelay and formattof, to support new HM - Removed obsolete mesure.*
This commit is contained in:
24
sicsobj.c
24
sicsobj.c
@ -6,6 +6,7 @@
|
||||
* Mark Koennecke, July 2007
|
||||
*/
|
||||
#include <stdio.h>
|
||||
#include <stdarg.h>
|
||||
#include <sics.h>
|
||||
#include <tcl.h>
|
||||
#include "assert.h"
|
||||
@ -186,7 +187,26 @@ static int assignPar(pHdb node, SConnection * pCon, char *data)
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
||||
/*---------------------------------------------------------------------------*/
|
||||
int runObjFunction(pSICSOBJ object, SConnection *pCon, pHdb commandNode)
|
||||
{
|
||||
pHdb parArray[64], child;
|
||||
int status, count = 0;
|
||||
SICSOBJFunc pFunc = NULL;
|
||||
|
||||
assert(commandNode != NULL);
|
||||
|
||||
child = commandNode->child;
|
||||
while(child != NULL){
|
||||
parArray[count] = child;
|
||||
count++;
|
||||
child = child->next;
|
||||
}
|
||||
pFunc = (SICSOBJFunc)commandNode->value.v.func;
|
||||
assert(pFunc != NULL);
|
||||
status = pFunc(object, pCon, commandNode, parArray, count);
|
||||
return status;
|
||||
}
|
||||
/*---------------------------------------------------------------------------*/
|
||||
static int invokeOBJFunction(pSICSOBJ object, pHdb commandNode,
|
||||
SConnection * pCon, int argc, char *argv[])
|
||||
@ -210,7 +230,7 @@ static int invokeOBJFunction(pSICSOBJ object, pHdb commandNode,
|
||||
count = 1;
|
||||
goto invoke;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* assign parameters and fill parameter array for function at the same
|
||||
* time. Be lenient about missing parameters: Then the old values will
|
||||
|
Reference in New Issue
Block a user