From c129abb4070b4980936bab3e926ddc188c620960 Mon Sep 17 00:00:00 2001 From: Sa Liu Date: Thu, 15 May 2008 12:57:41 +0000 Subject: [PATCH] Add check_effective_target_fortran_integer_16. From-SVN: r135346 --- gcc/testsuite/lib/target-supports.exp | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/gcc/testsuite/lib/target-supports.exp b/gcc/testsuite/lib/target-supports.exp index 2d14dde2ad5..3a8a08fe1e3 100644 --- a/gcc/testsuite/lib/target-supports.exp +++ b/gcc/testsuite/lib/target-supports.exp @@ -751,6 +751,18 @@ proc check_effective_target_fortran_large_int { } { }] } +# Return 1 if the target supports Fortran integer(16), 0 otherwise. +# +# When the target name changes, replace the cached result. + +proc check_effective_target_fortran_integer_16 { } { + return [check_no_compiler_messages fortran_integer_16 executable { + ! Fortran + integer(16) :: i + end + }] +} + # Return 1 if we can statically link libgfortran, 0 otherwise. # # When the target name changes, replace the cached result. -- 2.30.2