* installing *source* package ‘BayesFM’ ...
** package ‘BayesFM’ successfully unpacked and MD5 sums checked
** using staged installation
checking for grep that handles long lines and -e... /usr/bin/grep
checking for a sed that does not truncate output... /usr/bin/sed
checking for Fortran compiler... /usr/local/clang-trunk/bin/flang-new
configure: WARNING: the Fortran code contained in this package will be compiled with /usr/local/clang-trunk/bin/flang-new. Please contact package maintainer if compilation fails.
** libs
using C compiler: ‘clang version 17.0.0 (https://github.com/llvm/llvm-project.git 0aecf7ff0d81930d3d46daf1c0552441b793d904)’
using Fortran compiler: ‘flang-new version 17.0.0 (https://github.com/llvm/llvm-project.git 0aecf7ff0d81930d3d46daf1c0552441b793d904)’
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-flang/BayesFM/src'
/usr/local/clang-trunk/bin/clang -I"/data/gannet/ripley/R/R-flang/include" -DNDEBUG   -isystem /usr/local/clang-trunk/include -I/usr/local/clang/include    -fpic  -O3 -Wall -pedantic -Wp,-D_FORTIFY_SOURCE=3  -c init.c -o init.o
/usr/local/clang-trunk/bin/flang-new  -fpic  -O2 -pedantic  -c  global.f95 -o global.o
/usr/local/clang-trunk/bin/flang-new  -fpic  -O2 -pedantic  -c  matrix.f95 -o matrix.o
./matrix.f95:66:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=42_8)
        call rexit('*** ERROR: matrix is not square (chol) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:72:26: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=22_8)
        if(asum <= 0.0_r8) call rexit('*** ERROR: chol failed')
                           ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:101:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=47_8)
        call rexit('*** ERROR: zero diagonal element(s) (solvu) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:124:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=47_8)
        call rexit('*** ERROR: zero diagonal element(s) (solvl) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:155:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=44_8)
        call rexit('*** ERROR: matrix is not square (matinv) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:164:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=39_8)
        call rexit('*** ERROR: singular matrix (matinv) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:172:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=47_8)
        call rexit('*** ERROR: matrix inversion failed (matinv) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:194:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=44_8)
        call rexit('*** ERROR: matrix is not square (matinv) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:203:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=41_8) vs CHARACTER(KIND=1,LEN=44_8)
        call rexit('*** ERROR: LU decomposition failed (det) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./matrix.f95:36:7: previous reference to 'rexit'
        call rexit('### ERROR: trace only for square matrices')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang-trunk/bin/flang-new  -fpic  -O2 -pedantic  -c  probability.f95 -o probability.o
./probability.f95:150:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=52_8)
        call rexit('*** ERROR: rate parameter should be > 0 (rexpon) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:191:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=45_8)
        call rexit('*** ERROR: var should be positive (rnorm) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:222:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=46_8)
        call rexit('*** ERROR: var should be positive (rtnorm) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:268:20: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=44_8)
      if(a <= 0._r8) call rexit('*** ERROR: a should be positive (rgamma) ***')
                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:269:20: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=44_8)
      if(b <= 0._r8) call rexit('*** ERROR: b should be positive (rgamma) ***')
                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:311:20: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=47_8)
      if(a <= 0._r8) call rexit('*** ERROR: a should be positive (rinvgamma) ***')
                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:312:20: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=47_8)
      if(b <= 0._r8) call rexit('*** ERROR: b should be positive (rinvgamma) ***')
                     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:330:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=58_8)
        call rexit('*** ERROR: alpha should be strictly positive (rdirich) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:363:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=60_8)
        call rexit('*** ERROR: degrees of freedom should be > p-1 (rwishart) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:410:7: warning: Reference to the procedure 'rexit' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object types: CHARACTER(KIND=1,LEN=38_8) vs CHARACTER(KIND=1,LEN=41_8)
        call rexit('*** ERROR: b should be > 0 (rpoisson) ***')
        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./probability.f95:134:16: previous reference to 'rexit'
      if(b <= a) call rexit('*** ERROR: a should be < b (runif) ***')
                 ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang-trunk/bin/flang-new  -fpic  -O2 -pedantic  -c  covariates.f95 -o covariates.o
error: loc("/data/gannet/ripley/R/packages/tests-flang/BayesFM/src/covariates.f95":1:1): /data/gannet/ripley/Sources2/LLVM-git/llvm-project/flang/lib/Lower/CallInterface.cpp:903: not yet implemented: support for polymorphic types
LLVM ERROR: aborting
make[1]: *** [/data/gannet/ripley/R/R-flang/etc/Makeconf:217: covariates.o] Error 1
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-flang/BayesFM/src'
ERROR: compilation failed for package ‘BayesFM’
* removing ‘/data/gannet/ripley/R/packages/tests-flang/Libs/BayesFM-lib/BayesFM’
Command exited with non-zero status 1
Time 0:09.33, 2.87 + 0.95