[frontierkernel-commits] Frontier/Common/source langscan.c,1.5,1.6

[Terry T. <ter...@us...>]

Update of /cvsroot/frontierkernel/Frontier/Common/source
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20428/Frontier/Common/source

Modified Files:
	langscan.c 
Log Message:
Fix minor syntax error.

Index: langscan.c
===================================================================
RCS file: /cvsroot/frontierkernel/Frontier/Common/source/langscan.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** langscan.c	22 Jan 2005 18:35:56 -0000	1.5
--- langscan.c	24 Jan 2005 02:10:01 -0000	1.6
***************
*** 1161,1168 ****
  				if ((token2 == '}') || (ctscanlines > line2)) { /*we got a return, go ahead & strip it*/
  					
  					if (token2 == '}') /* 2005-01-15 creedon - fix suggested by JES w/caveats < http://sourceforge.net/tracker/index.php?func=detail&aid=1093595&group_id=120666&atid=687798 > */
  						ix1 = ix2 - 1;
  
! 					short len = ix2 - ix1;
  					
  					pullfromhandle (htext, ix1, len, nil); /*get rid of the token source*/
--- 1161,1170 ----
  				if ((token2 == '}') || (ctscanlines > line2)) { /*we got a return, go ahead & strip it*/
  					
+ 					short len;
+ 					
  					if (token2 == '}') /* 2005-01-15 creedon - fix suggested by JES w/caveats < http://sourceforge.net/tracker/index.php?func=detail&aid=1093595&group_id=120666&atid=687798 > */
  						ix1 = ix2 - 1;
  
! 					len = ix2 - ix1;
  					
  					pullfromhandle (htext, ix1, len, nil); /*get rid of the token source*/