Remove Unreferenced Labels

Description:  This refactoring reemoves the labels on labeled statements that are no longer referenced by any other statement inthe source code. If the label belongs to a CONTINUE statement, the entire line is removed from the code.

State: Implemeted         Author: Mariano Mendez      Version:  Submission Process

Code Example:

    program main
  integer ::i
      i=1
 100  if (i.lt.10) then
         i=1
 101     continue
 110  else
      end if

end program

900   subroutine OneSubroutine
          return
      end subroutine

      integer function OneFunc()
      994 OneFunc=1
      996 return
      end

    program main
  integer ::i
      i=1
      if (i.lt.10) then
         i=1
     else
      end if

end program

subroutine OneSubroutine
          return
      end subroutine

      integer function OneFunc()
      OneFunc=1
      return
      end

ScreenShots

      

HTML Comment Box is loading comments...