*** cubescan.l	Tue Aug 27 09:04:16 2002
--- ../cube/cubescan.l	Tue Jul 30 11:33:08 2002
***************
*** 34,40 ****
  
  n            [0-9]+
  integer      [+-]?{n}
! real         [+-]?({n}\.{n}?|\.{n})
  float        ({integer}|{real})([eE]{integer})?
  
  %%
--- 34,40 ----
  
  n            [0-9]+
  integer      [+-]?{n}
! real         [+-]?({n}\.{n}?)|(\.{n})
  float        ({integer}|{real})([eE]{integer})?
  
  %%