[committed] libgomp.fortran/get-mapped-ptr-1.f90: Use -6 for non-conf dev number

[Tobias Burnus]

Committed as r15-8659-gc264df142a850b:

This is a fix for the GOMP_interop commit r15-8654-g99e2906ae255fc that 
added GOMP_DEVICE_DEFAULT_OMP_61 alias omp_default_device, which is a 
conforming device number. But that test used -5 as check for a 
non-conforming device number.

Tobias
commit c264df142a850b47135c0c4639d3a539b23149c5
Author: Tobias Burnus <tbur...@baylibre.com>
Date:   Sat Mar 22 00:36:44 2025 +0100

    libgomp.fortran/get-mapped-ptr-1.f90: Use -6 for non-conf dev number
    
    This is a fix for the GOMP_interop commit r15-8654-g99e2906ae255fc that
    added GOMP_DEVICE_DEFAULT_OMP_61 alias omp_default_device, which is a
    conforming device number. But that test used -5 as check for a
    non-conforming device number.
    
    libgomp/ChangeLog:
    
            * testsuite/libgomp.fortran/get-mapped-ptr-1.f90: Use -6
            not -5 as non-conforming device number.
---
 libgomp/testsuite/libgomp.fortran/get-mapped-ptr-1.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libgomp/testsuite/libgomp.fortran/get-mapped-ptr-1.f90 b/libgomp/testsuite/libgomp.fortran/get-mapped-ptr-1.f90
index 9b6334f50d8..be60accbfec 100644
--- a/libgomp/testsuite/libgomp.fortran/get-mapped-ptr-1.f90
+++ b/libgomp/testsuite/libgomp.fortran/get-mapped-ptr-1.f90
@@ -19,7 +19,7 @@ program main
   if (omp_target_associate_ptr (c_loc (q), p, c_sizeof (q), &
                                 0_c_size_t, d) == 0) then
 
-    if(c_associated (omp_get_mapped_ptr (c_loc (q), -5))) &
+    if(c_associated (omp_get_mapped_ptr (c_loc (q), -6))) &
       stop 1
 
     if(c_associated (omp_get_mapped_ptr (c_loc (q), &