mybusinessbasic-devel

[<mti...@us...>]

Update of /cvsroot/mybusinessbasic/mybb
In directory sc8-pr-cvs1:/tmp/cvs-serv26209

Modified Files:
	parser.c 
Log Message:
fixes for task 90822

Index: parser.c
===================================================================
RCS file: /cvsroot/mybusinessbasic/mybb/parser.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** parser.c	18 Dec 2003 17:17:31 -0000	1.1
--- parser.c	29 Dec 2003 19:36:16 -0000	1.2
***************
*** 37,51 ****
  	}
  
! 	if(*prog == '?')
! 	{
! 		prog++;
! 		tokenpos++;
! 		*temp++ = 'P'; 
! 		*temp++ = 'R';
! 		*temp++ = 'I';
! 		*temp++ = 'N';
! 		*temp++ = 'T';
! 		return(token_type = TOK_COMMAND);
! 	}
  
  	if((*prog == '\'') && (lasttype == 1))
--- 37,53 ----
  	}
  
!         if ( (token_type = doShortCut()) ) return(token_type);
! 
! //	if(*prog == '?')
! //	{
! //		prog++;
! //		tokenpos++;
! //		*temp++ = 'P'; 
! //		*temp++ = 'R';
! //		*temp++ = 'I';
! //		*temp++ = 'N';
! //		*temp++ = 'T';
! //		return(token_type = TOK_COMMAND);
! //	}
  
  	if((*prog == '\'') && (lasttype == 1))