10
0
mirror of https://gitlab.com/scemama/irpf90.git synced 2024-12-22 04:13:33 +01:00

Handle program differently

This commit is contained in:
Anthony Scemama 2018-12-14 09:50:27 +01:00
parent 18c236a710
commit 405629b7e9

View File

@ -46,7 +46,6 @@ Fixed_form = 1
###################################################################### ######################################################################
# Dictionary of simple statements # Dictionary of simple statements
simple_dict = { simple_dict = {
"program": Program ,
"subroutine": Subroutine , "subroutine": Subroutine ,
"begin_shell": Begin_shell , "begin_shell": Begin_shell ,
"end_shell": End_shell , "end_shell": End_shell ,
@ -140,6 +139,9 @@ def get_type (i, filename, line, is_doc):
if firstword == "begin_doc": if firstword == "begin_doc":
return [ Begin_doc (i,line,filename) ], True return [ Begin_doc (i,line,filename) ], True
if firstword == "program":
return [ Program (i,line,filename) ], False
if is_doc: if is_doc:
return [ Doc (i,line,filename) ], is_doc return [ Doc (i,line,filename) ], is_doc