1*ec1e0c5eSMats Petersson! RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=50 2*ec1e0c5eSMats Petersson! Test the declare mapper construct with two default mappers. 3*ec1e0c5eSMats Petersson 4*ec1e0c5eSMats Peterssontype :: t1 5*ec1e0c5eSMats Petersson integer :: y 6*ec1e0c5eSMats Peterssonend type t1 7*ec1e0c5eSMats Petersson 8*ec1e0c5eSMats Peterssontype :: t2 9*ec1e0c5eSMats Petersson real :: y, z 10*ec1e0c5eSMats Peterssonend type t2 11*ec1e0c5eSMats Petersson 12*ec1e0c5eSMats Petersson!error: 'default' is already declared in this scoping unit 13*ec1e0c5eSMats Petersson 14*ec1e0c5eSMats Petersson!$omp declare mapper(t1::x) map(x, x%y) 15*ec1e0c5eSMats Petersson!$omp declare mapper(t2::w) map(w, w%y, w%z) 16*ec1e0c5eSMats Peterssonend 17