diff --git a/src/irp_stack.py b/src/irp_stack.py index 4437c0f..19eecf5 100644 --- a/src/irp_stack.py +++ b/src/irp_stack.py @@ -28,7 +28,6 @@ import util from command_line import command_line -do_assert = command_line.do_assert do_debug = command_line.do_debug do_openmp = command_line.do_openmp do_memory = command_line.do_memory @@ -159,7 +158,7 @@ end subroutine """ # $1 - if do_assert or do_debug: + if do_debug: s = """ if (.not.alloc) then """ @@ -223,7 +222,7 @@ end subroutine txt = txt.replace("$3","") # $4 - if do_debug or do_assert: + if do_debug: txt = txt.replace("$4",""" stack_index(ithread) = max(0,stack_index(ithread)-1)""") else: diff --git a/src/ninja.py b/src/ninja.py index b6d98b8..d5c55e4 100644 --- a/src/ninja.py +++ b/src/ninja.py @@ -360,7 +360,7 @@ def run(): l_common_s = [] - if command_line.do_assert: + if command_line.do_debug: l_common_o += [ "irp_stack.irp.o" ] l_common_s += [ "irp_stack.irp.F90" ] diff --git a/src/preprocessed_text.py b/src/preprocessed_text.py index 2529d76..232ee4d 100644 --- a/src/preprocessed_text.py +++ b/src/preprocessed_text.py @@ -511,7 +511,7 @@ def irp_simple_statements(text): def process_return(line): assert type(line) == Return - if command_line.do_assert or command_line.do_debug: + if command_line.do_debug: newline = Simple_line(line.i," call irp_leave(irp_here)",line.filename) result = [newline, line] else: @@ -551,7 +551,6 @@ def irp_simple_statements(text): Empty_line(i, "!", f), Empty_line(i, "! >>> %s"%(txt,), f), If (i, " if (.not.%s) then"%(condition,), f), - Simple_line(i, " call irp_trace", f), Simple_line(i, " print *, irp_here//': Assert failed:'", f), Simple_line(i, " print *, ' file: %s, line: %d'"%(f,i), f), Simple_line(i, " print *, '%s'"%(condition_str,), f), @@ -568,7 +567,7 @@ def irp_simple_statements(text): def process_end(line): '''Set irp_here variable in provider block''' line.text = "end" - if command_line.do_assert or command_line.do_debug: + if command_line.do_debug: i = line.i f = line.filename result = [ @@ -592,7 +591,7 @@ def irp_simple_statements(text): f = line.filename result = [ Begin_provider(i,line.text, (f,varname)), Declaration(i," character*(%d) :: irp_here = '%s'"%(length,varname), f) ] - if command_line.do_assert or command_line.do_debug: + if command_line.do_debug: result += [ Simple_line(i," call irp_enter(irp_here)", f), ] @@ -618,7 +617,7 @@ def irp_simple_statements(text): f = line.filename result = [ line, Declaration(i," character*(%d) :: irp_here = '%s'"%(length,subname), f) ] - if command_line.do_assert or command_line.do_debug: + if command_line.do_debug: result += [ Simple_line(i," call irp_enter_f(irp_here)", f), ] @@ -632,7 +631,7 @@ def irp_simple_statements(text): f = line.filename result = [ line, Declaration(i," character*(%d) :: irp_here = '%s'"%(length,subname), f) ] - if command_line.do_assert or command_line.do_debug: + if command_line.do_debug: result += [ Simple_line(i," call irp_enter_f(irp_here)", f), ] diff --git a/src/variable.py b/src/variable.py index 43d0d59..b5e94fc 100644 --- a/src/variable.py +++ b/src/variable.py @@ -547,7 +547,7 @@ class Variable(object): "!$ integer :: nthreads"] if command_line.do_openmp: result.append(" call irp_lock_%s(.True.)"%(same_as)) - if command_line.do_assert or command_line.do_debug: + if command_line.do_debug: result.append(" call irp_enter(irp_here)") result += call_provides(self.to_provide) result += flatten( map(build_alloc,[self.same_as]+self.others) ) @@ -555,7 +555,7 @@ class Variable(object): " call bld_%s"%(same_as), " %s_is_built = .True."%(same_as), "" ] result += [ " endif" ] - if command_line.do_assert or command_line.do_debug: + if command_line.do_debug: result.append(" call irp_leave(irp_here)") if command_line.do_openmp: result.append(" call irp_lock_%s(.False.)"%(same_as))