- Added some hipadab array math

- Added missing cnvrt files, stolen from Markus
- Debugged the new sinqhttpopt driver for SINQ HTTP HM
- Debugged the driver for the new S7 Siemens SPS
- Added handling of hexadecimal terminators to ascon.c
- Increased the write buffer size in asynnet again
- Fixed  a core dump in lld.c
- Added writing of second gen HM to nxscript.c
- Added doubletime command to SICS
- Fixed a core dump issue in sicshdbadapter.c on dimension changes
- Modified sicsobj to look for lower case keys too


SKIPPED:
	psi/cnvrt.c
	psi/cnvrt.h
	psi/el734hp.c
	psi/make_gen
	psi/sinqhttpopt.c
	psi/sinqhttpprot.c
	psi/spss7.c
	psi/swmotor.c
This commit is contained in:
koennecke
2011-04-08 14:18:42 +00:00
parent 268a7f4141
commit 446b05d6a2
25 changed files with 535 additions and 33 deletions

View File

@ -164,6 +164,44 @@ static pDynString findBlockEnd(pExeBuf self)
DeleteDynString(command);
return NULL;
}
/*-----------------attempt at a faster version -------------------------------
* But this only saves on the ConcatChar side of things......
*
* */
static pDynString findBlockEndExp(pExeBuf self)
{
pDynString command = NULL;
char *buffer = NULL;
char *cStart, *cEnd;
int i, len;
assert(self);
command = CreateDynString(80, 80);
if (command == NULL) {
return NULL;
}
buffer = GetCharArray(self->bufferContent);
if (self->end != -1) {
self->start = self->end + 1;
}
cStart = buffer +self->start;
cEnd = strchr(cStart,'\n');
while(cEnd != NULL){
len = cEnd - cStart+1;
DynStringConcatBytes(command,cStart, len);
self->lineno++;
if (Tcl_CommandComplete(GetCharArray(command))) {
self->end += len;
return command;
}
cStart = cEnd+1;
cEnd = strchr(cStart,'\n');
}
DeleteDynString(command);
return NULL;
}
/*---------------------------------------------------------------------*/
int exeBufProcess(pExeBuf self, SicsInterp * pSics,