[q-lang-cvs] qcalc qcalc.q,1.187,1.188

[Albert G. <ag...@us...>]

Update of /cvsroot/q-lang/qcalc
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv26247

Modified Files:
	qcalc.q 
Log Message:
bugfix: empty string wasn't highlighted in script editor

Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.187
retrieving revision 1.188
diff -C2 -d -r1.187 -r1.188
*** qcalc.q	25 Nov 2007 13:26:48 -0000	1.187
--- qcalc.q	26 Nov 2007 02:23:37 -0000	1.188
***************
*** 3211,3216 ****
    comment S, comment_start S, ident S;
  
! tok (S,[1,2])	= string S;
! tok (S,[3,4])	= string_start S;
  tok (S,[5])	= shebang S;
  tok (S,[6])	= comment S;
--- 3211,3216 ----
    comment S, comment_start S, ident S;
  
! tok (S,[1|_])	= string S;
! tok (S,[3|_])	= string_start S;
  tok (S,[5])	= shebang S;
  tok (S,[6])	= comment S;