LCPQ/irpf90
10
0
Fork 0
mirror of https://gitlab.com/scemama/irpf90.git synced 2024-12-21 20:03:33 +01:00
Code Releases Activity

Bug in select case

Browse Source 
Version:1.2.3
This commit is contained in:
Anthony Scemama 2011-10-03 11:47:33 +02:00
parent 3f2d536c65
commit caba30c9de
2 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/parsed_text.py
View File

@ -526,7 +526,7 @@ parsed_text = perform_loop_substitutions()
###################################################################### ######################################################################
if __name__ == '__main__': if __name__ == '__main__':
for i in range(len(parsed_text)): for i in range(len(parsed_text)):
# if parsed_text[i][0] == 'psi.irp.f': if parsed_text[i][0] == 'ao_oneD.irp.f':
print '!-------- %s -----------'%(parsed_text[i][0]) print '!-------- %s -----------'%(parsed_text[i][0])
for line in parsed_text[i][1]: for line in parsed_text[i][1]:
print line[1] print line[1]

3
src/preprocessed_text.py
View File

@ -129,8 +129,7 @@ def get_type (i, filename, line, is_doc):
return [ simple_dict[firstword](i,line,filename) ], is_doc return [ simple_dict[firstword](i,line,filename) ], is_doc
if firstword in [ "select", "selectcase" ]: if firstword in [ "select", "selectcase" ]:
return [ Select (i,"",filename) , return [ Select(i,line,filename) ] , is_doc
Simple_line (i,line,filename) ] , is_doc
if len(lower_line0) > 4: if len(lower_line0) > 4: