예제 #1
0
    def test_find_implicit_deps(self):
        parser = FortranParser()
        parser.parse(main)

        parser_two = FortranParser()
        parser_two.parse(mod)

        self.assertTrue(parser.findImplicit(parser_two))
예제 #2
0
    def test_find_implicit_deps2(self):
        parser = FortranParser()
        parser.parse(main)
        parser_two = FortranParser()
        mod = '''
        MODULE mod

        CONTAINS

          subroutine bin_array(n,x,y,n_bin,xmin,xmax,x_bin,y_bin)

            implicit none

            y_bin = s / c

          end subroutine bin_array
        END MODULE mod
        '''
        parser_two.parse(mod)
        self.assertTrue(parser.findImplicit(parser_two))