INTEGRATION: CWS ab17fixes (1.2.282); FILE MERGED

2005/09/29 18:28:52 hr 1.2.282.2: #i10000: manual resync; repair broken CWS
2005/08/17 11:18:44 ab 1.2.282.1: #125043# Also accept ; after channel
This commit is contained in:
Jens-Heiner Rechtien 2005-09-29 17:40:03 +00:00
parent 0f6c0c8131
commit 970312b249

View file

@ -4,9 +4,9 @@
*
* $RCSfile: io.cxx,v $
*
* $Revision: 1.5 $
* $Revision: 1.6 $
*
* last change: $Author: hr $ $Date: 2005-09-29 16:35:53 $
* last change: $Author: hr $ $Date: 2005-09-29 18:40:03 $
*
* The Contents of this file are made available subject to
* the terms of GNU Lesser General Public License Version 2.1.
@ -50,7 +50,8 @@ BOOL SbiParser::Channel( BOOL bAlways )
if( IsHash() )
{
SbiExpression aExpr( this );
if( Peek() == COMMA ) Next();
while( Peek() == COMMA || Peek() == SEMICOLON )
Next();
aExpr.Gen();
aGen.Gen( _CHANNEL );
bRes = TRUE;