left-over ASSIGN_INDEX error in WLI due to glf being the default

Bugzilla Link	505
Created on	Jun 05, 2009 17:56
Version	1.00beta
OS	Linux
Architecture	PC
Attachments	BlasLevel1.sac

Extended Description

Created an attachment (id=533)
source code
In several files we see this error popping up. BlasLEvel1 being one of them.
In the attached source code (a compressed version of BlasLevel1, we obtain:
nferring foldable with-loops ...
ASSERTION FAILED: file 'arrayopt/SSAWLI.c', line 677
left-over ASSIGN_INDEX found.
EXECUTION TERMINATED
Abort
in round 5 
when calling sac2c BlasLevel1.sac -noprelude -v4
with sac2c -V :
sac2c v1.00-beta (Buchette d'Anjou)
 developer rev 16108 linux-gnu_i686
 (Fri Jun  5 14:52:38 BST 2009 by sbs)