10
0
mirror of https://gitlab.com/scemama/irpf90.git synced 2024-12-21 11:53:32 +01:00

Changed PROVIDE behavior.

Now forces call_provide_* where the PROVIDE statement is.
This commit is contained in:
Anthony Scemama 2015-02-07 15:49:29 +01:00
parent 700387e56e
commit fa74b0bae2
3 changed files with 4 additions and 3 deletions

View File

@ -42,7 +42,7 @@ options['I'] = [ 'include' , 'Include directory', 1 ]
options['i'] = [ 'init' , 'Initialize current directory. Creates a default Makefile and the temporary working directories.', 0 ]
options['l'] = [ 'align' , 'Align arrays using compiler directives and sets the $IRP_ALIGN variable. For example, --align=32 aligns all arrays on a 32 byte boundary.', 1 ]
options['m'] = [ 'memory' , 'Print memory allocations/deallocations.', 0 ]
options['n'] = [ 'inline' , 'all|providers|builders : Force inlining of providers or builders', 1 ]
options['n'] = [ 'inline' , '<all|providers|builders> : Force inlining of providers or builders', 1 ]
options['o'] = [ 'checkopt' , 'Shows where optimization may be required', 0 ]
options['p'] = [ 'preprocess' , 'Prints a preprocessed file to standard output. Useful for debugging files containing shell scripts.', 1 ]
options['r'] = [ 'no_directives', 'Ignore all compiler directives !DEC$ and !DIR$', 0 ]

View File

@ -168,6 +168,7 @@ def get_parsed_text():
for v in l:
if v not in variables:
error.fail(line,"Variable %s is unknown"%(v))
append( (l,Provide(line.i,"",line.filename)) )
append( (l,Simple_line(line.i,"!%s"%(line.text),line.filename)) )
elif type(line) == NoDep:
l = line.lower.split()[1:]
@ -376,7 +377,7 @@ def move_variables():
or old_elsevars != []:
error.fail(line,"End if missing")
varlist = []
elif type(line) == Provide_all:
elif type(line) in (Provide,Provide_all):
append( (vars,line) )
else:
varlist += vars

View File

@ -1 +1 @@
version = "1.4.4"
version = "1.5.0"