- 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:
38
exebuf.c
38
exebuf.c
@ -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,
|
||||
|
Reference in New Issue
Block a user