flang/test/Parser/bug135964.f90 - third_party/github.com/llvm/llvm-project - Git at Google

 ! RUN: %flang_fc1 -fopenacc -fdebug-unparse %s | FileCheck %s
 !CHECK: !$ACC ROUTINE(square) BIND(asdf)

 function square(x)
   square = x * x
 end

 !$acc routine(square) bind(asdf)
	! RUN: %flang_fc1 -fopenacc -fdebug-unparse %s \| FileCheck %s
	!CHECK: !$ACC ROUTINE(square) BIND(asdf)

	function square(x)
	square = x * x
	end

	!$acc routine(square) bind(asdf)