* installing *source* package ‘geigen’ ...
** package ‘geigen’ successfully unpacked and MD5 sums checked
** using staged installation
** libs
using C compiler: ‘clang version 18.1.2’
using Fortran compiler: ‘flang-new version 18.1.2’
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/geigen/src'
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c dggsvd3.f -o dggsvd3.o
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c dggsvp3.f -o dggsvp3.o
/usr/local/clang18/bin/clang -I"/data/gannet/ripley/R/R-clang/include" -DNDEBUG   -isystem /usr/local/clang18/include -I/usr/local/clang/include    -fpic  -O3 -Wall -pedantic -Wp,-D_FORTIFY_SOURCE=3  -c init.c -o init.o
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c xdgges.f -o xdgges.o
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c xdggev.f -o xdggev.o
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c xdggsvd.f -o xdggsvd.o
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c xzgges.f -o xzgges.o
./xzgges.f:15:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex     a(n,*), alpha(*),
        ^^^^^^^^^^^^^^
./xzgges.f:15:7: in the context: intrinsic type spec
        double complex     a(n,*), alpha(*),
        ^
./xzgges.f:15:7: in the context: declaration type spec
        double complex     a(n,*), alpha(*),
        ^
./xzgges.f:15:7: in the context: specification construct
        double complex     a(n,*), alpha(*),
        ^
./xzgges.f:15:7: in the context: declaration construct
        double complex     a(n,*), alpha(*),
        ^
./xzgges.f:9:7: in the context: specification part
        integer            kjobvsl, kjobvsr, kevsort
        ^
./xzgges.f:4:7: in the context: SUBROUTINE subprogram
        subroutine xzgges(kjobvsl, kjobvsr, kevsort, n, a, b,
        ^
./xzgges.f:69:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex alpha,beta
        ^^^^^^^^^^^^^^
./xzgges.f:69:7: in the context: intrinsic type spec
        double complex alpha,beta
        ^
./xzgges.f:69:7: in the context: declaration type spec
        double complex alpha,beta
        ^
./xzgges.f:69:7: in the context: specification construct
        double complex alpha,beta
        ^
./xzgges.f:69:7: in the context: declaration construct
        double complex alpha,beta
        ^
./xzgges.f:69:7: in the context: specification part
        double complex alpha,beta
        ^
./xzgges.f:68:7: in the context: FUNCTION subprogram
        logical function zelctg(alpha,beta)
        ^
./xzgges.f:77:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex alpha,beta
        ^^^^^^^^^^^^^^
./xzgges.f:77:7: in the context: intrinsic type spec
        double complex alpha,beta
        ^
./xzgges.f:77:7: in the context: declaration type spec
        double complex alpha,beta
        ^
./xzgges.f:77:7: in the context: specification construct
        double complex alpha,beta
        ^
./xzgges.f:77:7: in the context: declaration construct
        double complex alpha,beta
        ^
./xzgges.f:77:7: in the context: specification part
        double complex alpha,beta
        ^
./xzgges.f:76:7: in the context: FUNCTION subprogram
        logical function zevzero(alpha,beta)
        ^
./xzgges.f:92:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex alpha,beta
        ^^^^^^^^^^^^^^
./xzgges.f:92:7: in the context: intrinsic type spec
        double complex alpha,beta
        ^
./xzgges.f:92:7: in the context: declaration type spec
        double complex alpha,beta
        ^
./xzgges.f:92:7: in the context: specification construct
        double complex alpha,beta
        ^
./xzgges.f:92:7: in the context: declaration construct
        double complex alpha,beta
        ^
./xzgges.f:92:7: in the context: specification part
        double complex alpha,beta
        ^
./xzgges.f:91:7: in the context: FUNCTION subprogram
        logical function zrevneg(alpha,beta)
        ^
./xzgges.f:102:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex alpha,beta
        ^^^^^^^^^^^^^^
./xzgges.f:102:7: in the context: intrinsic type spec
        double complex alpha,beta
        ^
./xzgges.f:102:7: in the context: declaration type spec
        double complex alpha,beta
        ^
./xzgges.f:102:7: in the context: specification construct
        double complex alpha,beta
        ^
./xzgges.f:102:7: in the context: declaration construct
        double complex alpha,beta
        ^
./xzgges.f:102:7: in the context: specification part
        double complex alpha,beta
        ^
./xzgges.f:101:7: in the context: FUNCTION subprogram
        logical function zrevpos(alpha,beta)
        ^
./xzgges.f:112:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex alpha,beta
        ^^^^^^^^^^^^^^
./xzgges.f:112:7: in the context: intrinsic type spec
        double complex alpha,beta
        ^
./xzgges.f:112:7: in the context: declaration type spec
        double complex alpha,beta
        ^
./xzgges.f:112:7: in the context: specification construct
        double complex alpha,beta
        ^
./xzgges.f:112:7: in the context: declaration construct
        double complex alpha,beta
        ^
./xzgges.f:112:7: in the context: specification part
        double complex alpha,beta
        ^
./xzgges.f:111:7: in the context: FUNCTION subprogram
        logical function zevudi(alpha,beta)
        ^
./xzgges.f:126:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex alpha,beta
        ^^^^^^^^^^^^^^
./xzgges.f:126:7: in the context: intrinsic type spec
        double complex alpha,beta
        ^
./xzgges.f:126:7: in the context: declaration type spec
        double complex alpha,beta
        ^
./xzgges.f:126:7: in the context: specification construct
        double complex alpha,beta
        ^
./xzgges.f:126:7: in the context: declaration construct
        double complex alpha,beta
        ^
./xzgges.f:126:7: in the context: specification part
        double complex alpha,beta
        ^
./xzgges.f:125:7: in the context: FUNCTION subprogram
        logical function zevudo(alpha,beta)
        ^
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c xzggev.f -o xzggev.o
./xzggev.f:13:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex     a(n, *) , alpha(*), b(n, *),
        ^^^^^^^^^^^^^^
./xzggev.f:13:7: in the context: intrinsic type spec
        double complex     a(n, *) , alpha(*), b(n, *),
        ^
./xzggev.f:13:7: in the context: declaration type spec
        double complex     a(n, *) , alpha(*), b(n, *),
        ^
./xzggev.f:13:7: in the context: specification construct
        double complex     a(n, *) , alpha(*), b(n, *),
        ^
./xzggev.f:13:7: in the context: declaration construct
        double complex     a(n, *) , alpha(*), b(n, *),
        ^
./xzggev.f:8:7: in the context: specification part
        integer            kjobvl, kjobvr
        ^
./xzggev.f:4:7: in the context: SUBROUTINE subprogram
        subroutine xzggev(kjobvl, kjobvr, n, a, b, alpha, beta,
        ^
./xzggev.f:41:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex     a(n, *), b(n, *), work(*)
        ^^^^^^^^^^^^^^
./xzggev.f:41:7: in the context: intrinsic type spec
        double complex     a(n, *), b(n, *), work(*)
        ^
./xzggev.f:41:7: in the context: declaration type spec
        double complex     a(n, *), b(n, *), work(*)
        ^
./xzggev.f:41:7: in the context: specification construct
        double complex     a(n, *), b(n, *), work(*)
        ^
./xzggev.f:41:7: in the context: declaration construct
        double complex     a(n, *), b(n, *), work(*)
        ^
./xzggev.f:36:7: in the context: specification part
        integer            kjobz, kuplo
        ^
./xzggev.f:32:7: in the context: SUBROUTINE subprogram
        subroutine xzhegv(itype, kjobz, kuplo, n, a, b, w, work,
        ^
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c xzggsvd.f -o xzggsvd.o
./xzggsvd.f:15:7: portability: nonstandard usage: DOUBLE COMPLEX
        double complex     a(lda, *), b(ldb, *),
        ^^^^^^^^^^^^^^
./xzggsvd.f:15:7: in the context: intrinsic type spec
        double complex     a(lda, *), b(ldb, *),
        ^
./xzggsvd.f:15:7: in the context: declaration type spec
        double complex     a(lda, *), b(ldb, *),
        ^
./xzggsvd.f:15:7: in the context: specification construct
        double complex     a(lda, *), b(ldb, *),
        ^
./xzggsvd.f:15:7: in the context: declaration construct
        double complex     a(lda, *), b(ldb, *),
        ^
./xzggsvd.f:8:7: in the context: specification part
        integer            kjobu, kjobv, kjobq
        ^
./xzggsvd.f:3:7: in the context: SUBROUTINE subprogram
        subroutine xzggsvd(kjobu, kjobv, kjobq, m, n, p, k, l, a, lda, b,
        ^
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c zggsvdall.f -o zggsvdall.o
./zggsvdall.f:369:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
               ^^^
./zggsvdall.f:369:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:369:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:369:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:369:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:362:7: in the context: specification part
        CHARACTER          JOBQ, JOBU, JOBV
        ^
./zggsvdall.f:352:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZGGSVD3( JOBU, JOBV, JOBQ, M, N, P, K, L, A, LDA, B,
        ^
./zggsvdall.f:802:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
               ^^^
./zggsvdall.f:802:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:802:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:802:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:802:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:791:7: in the context: specification part
        IMPLICIT NONE
        ^
./zggsvdall.f:782:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZGGSVP3( JOBU, JOBV, JOBQ, M, P, N, A, LDA, B, LDB,
        ^
./zggsvdall.f:809:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         CZERO, CONE
               ^^^
./zggsvdall.f:809:7: in the context: intrinsic type spec
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:809:7: in the context: declaration type spec
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:809:7: in the context: specification construct
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:809:7: in the context: declaration construct
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:791:7: in the context: specification part
        IMPLICIT NONE
        ^
./zggsvdall.f:782:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZGGSVP3( JOBU, JOBV, JOBQ, M, P, N, A, LDA, B, LDB,
        ^
./zggsvdall.f:1479:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
               ^^^
./zggsvdall.f:1479:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:1479:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:1479:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:1479:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), Q( LDQ, * ),
        ^
./zggsvdall.f:1472:7: in the context: specification part
        CHARACTER          JOBQ, JOBU, JOBV
        ^
./zggsvdall.f:1462:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZTGSJA( JOBU, JOBV, JOBQ, M, P, N, K, L, A, LDA, B,
        ^
./zggsvdall.f:1490:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         CZERO, CONE
               ^^^
./zggsvdall.f:1490:7: in the context: intrinsic type spec
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:1490:7: in the context: declaration type spec
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:1490:7: in the context: specification construct
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:1490:7: in the context: declaration construct
        COMPLEX*16         CZERO, CONE
        ^
./zggsvdall.f:1472:7: in the context: specification part
        CHARACTER          JOBQ, JOBU, JOBV
        ^
./zggsvdall.f:1462:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZTGSJA( JOBU, JOBV, JOBQ, M, P, N, K, L, A, LDA, B,
        ^
./zggsvdall.f:1500:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
               ^^^
./zggsvdall.f:1500:7: in the context: intrinsic type spec
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1500:7: in the context: declaration type spec
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1500:7: in the context: specification construct
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1500:7: in the context: declaration construct
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1472:7: in the context: specification part
        CHARACTER          JOBQ, JOBU, JOBV
        ^
./zggsvdall.f:1462:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZTGSJA( JOBU, JOBV, JOBQ, M, P, N, K, L, A, LDA, B,
        ^
./zggsvdall.f:1919:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
               ^^^
./zggsvdall.f:1919:7: in the context: intrinsic type spec
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1919:7: in the context: declaration type spec
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1919:7: in the context: specification construct
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1919:7: in the context: declaration construct
        COMPLEX*16         A2, B2, SNQ, SNU, SNV
        ^
./zggsvdall.f:1917:7: in the context: specification part
        LOGICAL            UPPER
        ^
./zggsvdall.f:1908:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAGS2( UPPER, A1, A2, A3, B1, B2, B3, CSU, SNU, CSV,
        ^
./zggsvdall.f:1932:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         B, C, D1, R, T, UA11, UA12, UA21, UA22, VB11,
               ^^^
./zggsvdall.f:1932:7: in the context: intrinsic type spec
        COMPLEX*16         B, C, D1, R, T, UA11, UA12, UA21, UA22, VB11,
        ^
./zggsvdall.f:1932:7: in the context: declaration type spec
        COMPLEX*16         B, C, D1, R, T, UA11, UA12, UA21, UA22, VB11,
        ^
./zggsvdall.f:1932:7: in the context: specification construct
        COMPLEX*16         B, C, D1, R, T, UA11, UA12, UA21, UA22, VB11,
        ^
./zggsvdall.f:1932:7: in the context: declaration construct
        COMPLEX*16         B, C, D1, R, T, UA11, UA12, UA21, UA22, VB11,
        ^
./zggsvdall.f:1917:7: in the context: specification part
        LOGICAL            UPPER
        ^
./zggsvdall.f:1908:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAGS2( UPPER, A1, A2, A3, B1, B2, B3, CSU, SNU, CSV,
        ^
./zggsvdall.f:2262:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         X( * ), Y( * )
               ^^^
./zggsvdall.f:2262:7: in the context: intrinsic type spec
        COMPLEX*16         X( * ), Y( * )
        ^
./zggsvdall.f:2262:7: in the context: declaration type spec
        COMPLEX*16         X( * ), Y( * )
        ^
./zggsvdall.f:2262:7: in the context: specification construct
        COMPLEX*16         X( * ), Y( * )
        ^
./zggsvdall.f:2262:7: in the context: declaration construct
        COMPLEX*16         X( * ), Y( * )
        ^
./zggsvdall.f:2258:7: in the context: specification part
        INTEGER            INCX, INCY, N
        ^
./zggsvdall.f:2250:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAPLL( N, X, INCX, Y, INCY, SSMIN )
        ^
./zggsvdall.f:2270:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         CONE
               ^^^
./zggsvdall.f:2270:7: in the context: intrinsic type spec
        COMPLEX*16         CONE
        ^
./zggsvdall.f:2270:7: in the context: declaration type spec
        COMPLEX*16         CONE
        ^
./zggsvdall.f:2270:7: in the context: specification construct
        COMPLEX*16         CONE
        ^
./zggsvdall.f:2270:7: in the context: declaration construct
        COMPLEX*16         CONE
        ^
./zggsvdall.f:2258:7: in the context: specification part
        INTEGER            INCX, INCY, N
        ^
./zggsvdall.f:2250:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAPLL( N, X, INCX, Y, INCY, SSMIN )
        ^
./zggsvdall.f:2275:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A11, A12, A22, C, TAU
               ^^^
./zggsvdall.f:2275:7: in the context: intrinsic type spec
        COMPLEX*16         A11, A12, A22, C, TAU
        ^
./zggsvdall.f:2275:7: in the context: declaration type spec
        COMPLEX*16         A11, A12, A22, C, TAU
        ^
./zggsvdall.f:2275:7: in the context: specification construct
        COMPLEX*16         A11, A12, A22, C, TAU
        ^
./zggsvdall.f:2275:7: in the context: declaration construct
        COMPLEX*16         A11, A12, A22, C, TAU
        ^
./zggsvdall.f:2258:7: in the context: specification part
        INTEGER            INCX, INCY, N
        ^
./zggsvdall.f:2250:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAPLL( N, X, INCX, Y, INCY, SSMIN )
        ^
./zggsvdall.f:2281:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         ZDOTC
               ^^^
./zggsvdall.f:2281:7: in the context: intrinsic type spec
        COMPLEX*16         ZDOTC
        ^
./zggsvdall.f:2281:7: in the context: declaration type spec
        COMPLEX*16         ZDOTC
        ^
./zggsvdall.f:2281:7: in the context: specification construct
        COMPLEX*16         ZDOTC
        ^
./zggsvdall.f:2281:7: in the context: declaration construct
        COMPLEX*16         ZDOTC
        ^
./zggsvdall.f:2258:7: in the context: specification part
        INTEGER            INCX, INCY, N
        ^
./zggsvdall.f:2250:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAPLL( N, X, INCX, Y, INCY, SSMIN )
        ^
./zggsvdall.f:2453:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), TAU( * ), WORK( * )
               ^^^
./zggsvdall.f:2453:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2453:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2453:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2453:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2450:7: in the context: specification part
        INTEGER            INFO, LDA, M, N
        ^
./zggsvdall.f:2442:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZGERQ2( M, N, A, LDA, TAU, WORK, INFO )
        ^
./zggsvdall.f:2459:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         ONE
               ^^^
./zggsvdall.f:2459:7: in the context: intrinsic type spec
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2459:7: in the context: declaration type spec
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2459:7: in the context: specification construct
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2459:7: in the context: declaration construct
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2450:7: in the context: specification part
        INTEGER            INFO, LDA, M, N
        ^
./zggsvdall.f:2442:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZGERQ2( M, N, A, LDA, TAU, WORK, INFO )
        ^
./zggsvdall.f:2464:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         ALPHA
               ^^^
./zggsvdall.f:2464:7: in the context: intrinsic type spec
        COMPLEX*16         ALPHA
        ^
./zggsvdall.f:2464:7: in the context: declaration type spec
        COMPLEX*16         ALPHA
        ^
./zggsvdall.f:2464:7: in the context: specification construct
        COMPLEX*16         ALPHA
        ^
./zggsvdall.f:2464:7: in the context: declaration construct
        COMPLEX*16         ALPHA
        ^
./zggsvdall.f:2450:7: in the context: specification part
        INTEGER            INFO, LDA, M, N
        ^
./zggsvdall.f:2442:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZGERQ2( M, N, A, LDA, TAU, WORK, INFO )
        ^
./zggsvdall.f:2630:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         X( LDX, * )
               ^^^
./zggsvdall.f:2630:7: in the context: intrinsic type spec
        COMPLEX*16         X( LDX, * )
        ^
./zggsvdall.f:2630:7: in the context: declaration type spec
        COMPLEX*16         X( LDX, * )
        ^
./zggsvdall.f:2630:7: in the context: specification construct
        COMPLEX*16         X( LDX, * )
        ^
./zggsvdall.f:2630:7: in the context: declaration construct
        COMPLEX*16         X( LDX, * )
        ^
./zggsvdall.f:2625:7: in the context: specification part
        LOGICAL            FORWRD
        ^
./zggsvdall.f:2617:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAPMT( FORWRD, M, N, X, LDX, K )
        ^
./zggsvdall.f:2637:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         TEMP
               ^^^
./zggsvdall.f:2637:7: in the context: intrinsic type spec
        COMPLEX*16         TEMP
        ^
./zggsvdall.f:2637:7: in the context: declaration type spec
        COMPLEX*16         TEMP
        ^
./zggsvdall.f:2637:7: in the context: specification construct
        COMPLEX*16         TEMP
        ^
./zggsvdall.f:2637:7: in the context: declaration construct
        COMPLEX*16         TEMP
        ^
./zggsvdall.f:2625:7: in the context: specification part
        LOGICAL            FORWRD
        ^
./zggsvdall.f:2617:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZLAPMT( FORWRD, M, N, X, LDX, K )
        ^
./zggsvdall.f:2887:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), C( LDC, * ), TAU( * ), WORK( * )
               ^^^
./zggsvdall.f:2887:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), C( LDC, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2887:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), C( LDC, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2887:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), C( LDC, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2887:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), C( LDC, * ), TAU( * ), WORK( * )
        ^
./zggsvdall.f:2883:7: in the context: specification part
        CHARACTER          SIDE, TRANS
        ^
./zggsvdall.f:2874:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZUNMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC,
        ^
./zggsvdall.f:2893:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         ONE
               ^^^
./zggsvdall.f:2893:7: in the context: intrinsic type spec
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2893:7: in the context: declaration type spec
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2893:7: in the context: specification construct
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2893:7: in the context: declaration construct
        COMPLEX*16         ONE
        ^
./zggsvdall.f:2883:7: in the context: specification part
        CHARACTER          SIDE, TRANS
        ^
./zggsvdall.f:2874:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZUNMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC,
        ^
./zggsvdall.f:2899:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         AII, TAUI
               ^^^
./zggsvdall.f:2899:7: in the context: intrinsic type spec
        COMPLEX*16         AII, TAUI
        ^
./zggsvdall.f:2899:7: in the context: declaration type spec
        COMPLEX*16         AII, TAUI
        ^
./zggsvdall.f:2899:7: in the context: specification construct
        COMPLEX*16         AII, TAUI
        ^
./zggsvdall.f:2899:7: in the context: declaration construct
        COMPLEX*16         AII, TAUI
        ^
./zggsvdall.f:2883:7: in the context: specification part
        CHARACTER          SIDE, TRANS
        ^
./zggsvdall.f:2874:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZUNMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC,
        ^
/usr/local/clang18/bin/flang-new  -fpic  -O2 -pedantic  -c zhegall.f -o zhegall.o
./zhegall.f:195:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), B( LDB, * ), WORK( * )
               ^^^
./zhegall.f:195:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), WORK( * )
        ^
./zhegall.f:195:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * ), WORK( * )
        ^
./zhegall.f:195:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), WORK( * )
        ^
./zhegall.f:195:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), B( LDB, * ), WORK( * )
        ^
./zhegall.f:190:7: in the context: specification part
        CHARACTER          JOBZ, UPLO
        ^
./zhegall.f:181:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZHEGV( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, WORK,
        ^
./zhegall.f:201:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         ONE
               ^^^
./zhegall.f:201:7: in the context: intrinsic type spec
        COMPLEX*16         ONE
        ^
./zhegall.f:201:7: in the context: declaration type spec
        COMPLEX*16         ONE
        ^
./zhegall.f:201:7: in the context: specification construct
        COMPLEX*16         ONE
        ^
./zhegall.f:201:7: in the context: declaration construct
        COMPLEX*16         ONE
        ^
./zhegall.f:190:7: in the context: specification part
        CHARACTER          JOBZ, UPLO
        ^
./zhegall.f:181:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZHEGV( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, WORK,
        ^
./zhegall.f:461:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), B( LDB, * )
               ^^^
./zhegall.f:461:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:461:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:461:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:461:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:457:7: in the context: specification part
        CHARACTER          UPLO
        ^
./zhegall.f:449:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZHEGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO )
        ^
./zhegall.f:469:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         CONE
               ^^^
./zhegall.f:469:7: in the context: intrinsic type spec
        COMPLEX*16         CONE
        ^
./zhegall.f:469:7: in the context: declaration type spec
        COMPLEX*16         CONE
        ^
./zhegall.f:469:7: in the context: specification construct
        COMPLEX*16         CONE
        ^
./zhegall.f:469:7: in the context: declaration construct
        COMPLEX*16         CONE
        ^
./zhegall.f:457:7: in the context: specification part
        CHARACTER          UPLO
        ^
./zhegall.f:449:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZHEGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO )
        ^
./zhegall.f:476:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         CT
               ^^^
./zhegall.f:476:7: in the context: intrinsic type spec
        COMPLEX*16         CT
        ^
./zhegall.f:476:7: in the context: declaration type spec
        COMPLEX*16         CT
        ^
./zhegall.f:476:7: in the context: specification construct
        COMPLEX*16         CT
        ^
./zhegall.f:476:7: in the context: declaration construct
        COMPLEX*16         CT
        ^
./zhegall.f:457:7: in the context: specification part
        CHARACTER          UPLO
        ^
./zhegall.f:449:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZHEGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO )
        ^
./zhegall.f:757:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         A( LDA, * ), B( LDB, * )
               ^^^
./zhegall.f:757:7: in the context: intrinsic type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:757:7: in the context: declaration type spec
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:757:7: in the context: specification construct
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:757:7: in the context: declaration construct
        COMPLEX*16         A( LDA, * ), B( LDB, * )
        ^
./zhegall.f:753:7: in the context: specification part
        CHARACTER          UPLO
        ^
./zhegall.f:745:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO )
        ^
./zhegall.f:765:14: portability: nonstandard usage: TYPE*KIND syntax
        COMPLEX*16         CONE, HALF
               ^^^
./zhegall.f:765:7: in the context: intrinsic type spec
        COMPLEX*16         CONE, HALF
        ^
./zhegall.f:765:7: in the context: declaration type spec
        COMPLEX*16         CONE, HALF
        ^
./zhegall.f:765:7: in the context: specification construct
        COMPLEX*16         CONE, HALF
        ^
./zhegall.f:765:7: in the context: declaration construct
        COMPLEX*16         CONE, HALF
        ^
./zhegall.f:753:7: in the context: specification part
        CHARACTER          UPLO
        ^
./zhegall.f:745:7: in the context: SUBROUTINE subprogram
        SUBROUTINE ZHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO )
        ^
/usr/local/clang18/bin/clang -shared -L/usr/local/clang/lib64 -L/usr/local/clang18/lib -L/usr/local/clang18/lib/x86_64-unknown-linux-gnu -L/usr/local/gcc13/lib64 -L/usr/local/lib64 -o geigen.so dggsvd3.o dggsvp3.o init.o xdgges.o xdggev.o xdggsvd.o xzgges.o xzggev.o xzggsvd.o zggsvdall.o zhegall.o -L/data/gannet/ripley/R/R-clang/lib -lRlapack -L/data/gannet/ripley/R/R-clang/lib -lRblas -lFortran_main -lFortranRuntime -lFortranDecimal -lm -lFortran_main -lFortranRuntime -lFortranDecimal -lm
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/geigen/src'
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/geigen/src'
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/geigen/src'
installing to /data/gannet/ripley/R/packages/tests-clang/geigen.Rcheck/00LOCK-geigen/00new/geigen/libs
** R
** inst
** byte-compile and prepare package for lazy loading
** help
*** installing help indices
** building package indices
** testing if installed package can be loaded from temporary location
** checking absolute paths in shared objects and dynamic libraries
** testing if installed package can be loaded from final location
** testing if installed package keeps a record of temporary installation path
* DONE (geigen)