- A few fixes to the hsitogram memory codes

- Many fixes for the triple axis code
This commit is contained in:
cvs
2003-04-10 11:41:22 +00:00
parent bfb09e4593
commit cb4bbbc93c
35 changed files with 482 additions and 171 deletions

19
mumo.c
View File

@ -190,6 +190,7 @@ static int SaveMumo(void *pData, char *name, FILE *fd)
#define LIST 13
#define DEFPOS 14
#define RECOVERNAMPOS 15
#define GETPOS 16
/*-------------------------------------------------------------------------*/
static int GetNextToken(psParser self, pMulMot pDings)
{
@ -317,6 +318,11 @@ static int SaveMumo(void *pData, char *name, FILE *fd)
self->iCurrentToken = DEFPOS;
return DEFPOS;
}
else if(strcmp(self->Token,"getpos") ==0)
{
self->iCurrentToken = GETPOS;
return GETPOS;
}
else if(strcmp(self->Token,"recovernampos") ==0)
{
self->iCurrentToken = RECOVERNAMPOS;
@ -736,6 +742,7 @@ static void RecoverNamPos(pMulMot self, int argc, char *argv[])
decrement, increment and simple values.
DingsBums pos name - makes the current position a named
position with name name.
DingsBums getpos - gets the current named position
DingsBums drop name - deletes the current named position
name.
DingsBums drop all - drops all named positions (except back)
@ -830,6 +837,18 @@ static void RecoverNamPos(pMulMot self, int argc, char *argv[])
return 0;
}
break;
case GETPOS:
pPtr = FindNamPos(self,pCon);
if(pPtr != NULL)
{
sprintf(pBueffel,"%s.nampos = %s",argv[0], pPtr);
}
else
{
sprintf(pBueffel,"%s.nampos = undefined",argv[0]);
}
SCWrite(pCon,pBueffel,eValue);
return 1;
case DEFPOS:
SCparChange(pCon);
return ParseDefPos(pSics,&MyParser,self,pCon);