[Ganc-commit] ganc/src parser_stuff.c,1.10,1.11

[<ho...@us...>]

Update of /cvsroot/ganc/ganc/src
In directory sc8-pr-cvs1:/tmp/cvs-serv1995/src

Modified Files:
	parser_stuff.c 
Log Message:
Fixed bug that caused problems with numbers with signed exponent such as 
2e-2 2e+2


Index: parser_stuff.c
===================================================================
RCS file: /cvsroot/ganc/ganc/src/parser_stuff.c,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** parser_stuff.c	13 Dec 2003 23:55:56 -0000	1.10
--- parser_stuff.c	14 Jan 2004 00:23:58 -0000	1.11
***************
*** 313,316 ****
--- 313,321 ----
    // we've got an 'entry', lets check it
    if (epos>pos) {
+     // check if we have an exponent coming up
+     if (input[epos - 1]=='e' && (input[epos]=='+' || input[epos]=='-')) {
+       ++epos;
+       while (isdigit (input[epos])) ++epos;
+     }
      // if 'syntactically' opened or closed
      if (previous_token_closing) {