Which “line” is end of block (module, program, block data, subroutine,
function) statement ?
# File lib/rdoc/parser/f95.rb, line 1574
def block_end?(line)
return nil if !line
if line =~ /^\s*?end\s*?(!.*?)?$/ ||
line =~ /^\s*?end\s+module(\s+\w+)?\s*?(!.*?)?$/ ||
line =~ /^\s*?end\s+program(\s+\w+)?\s*?(!.*?)?$/ ||
line =~ /^\s*?end\s+block\s+data(\s+\w+)?\s*?(!.*?)?$/ ||
line =~ /^\s*?end\s+subroutine(\s+\w+)?\s*?(!.*?)?$/ ||
line =~ /^\s*?end\s+function(\s+\w+)?\s*?(!.*?)?$/
return true
end
return nil
end