Remove [dz]gemmtr symbols from Windows build

.ci_support/osx_64_.yaml

@@ -7,7 +7,7 @@ bzip2:
 c_compiler:
 - clang
 c_compiler_version:
-- '18'
+- '19'
 c_stdlib:
 - macosx_deployment_target
 c_stdlib_version:
@@ -21,15 +21,15 @@ channel_targets:
 cxx_compiler:
 - clangxx
 cxx_compiler_version:
-- '18'
+- '19'
 expat:
 - '2'
 fontconfig:
 - '2'
 fortran_compiler:
 - gfortran
 fortran_compiler_version:
-- '13'
+- '14'
 glib:
 - '2'
 gsl:
@@ -55,7 +55,7 @@ libpng:
 libtiff:
 - '4.7'
 llvm_openmp:
-- '18'
+- '19'
 macos_machine:
 - x86_64-apple-darwin13.4.0
 pango:

.ci_support/osx_arm64_.yaml

@@ -7,7 +7,7 @@ bzip2:
 c_compiler:
 - clang
 c_compiler_version:
-- '18'
+- '19'
 c_stdlib:
 - macosx_deployment_target
 c_stdlib_version:
@@ -21,15 +21,15 @@ channel_targets:
 cxx_compiler:
 - clangxx
 cxx_compiler_version:
-- '18'
+- '19'
 expat:
 - '2'
 fontconfig:
 - '2'
 fortran_compiler:
 - gfortran
 fortran_compiler_version:
-- '13'
+- '14'
 glib:
 - '2'
 gsl:
@@ -55,7 +55,7 @@ libpng:
 libtiff:
 - '4.7'
 llvm_openmp:
-- '18'
+- '19'
 macos_machine:
 - arm64-apple-darwin20.0.0
 pango:

recipe/0019-Remove-dgemmtr-and-zgemmtr.patch

@@ -0,0 +1,144 @@
+From 025a7ea822ebff6a9d1fb1484c2de7acc8bc938e Mon Sep 17 00:00:00 2001
+From: Isabel Paredes <isabel.paredes@quantstack.net>
+Date: Thu, 17 Jul 2025 18:59:06 +0200
+Subject: [PATCH] Remove dgemmtr and zgemmtr
+
+---
+ src/extra/blas/Rblas.def     |  2 --
+ src/modules/lapack/cmplx.f   | 28 ++++++++++++++--------------
+ src/modules/lapack/dlapack.f | 14 +++++++-------
+ 3 files changed, 21 insertions(+), 23 deletions(-)
+
+diff --git a/src/extra/blas/Rblas.def b/src/extra/blas/Rblas.def
+index b2eb43a82f..06ec1d8e1c 100644
+--- a/src/extra/blas/Rblas.def
++++ b/src/extra/blas/Rblas.def
+@@ -7,7 +7,6 @@ EXPORTS
+  ddot_
+  dgbmv_
+  dgemm_
+- dgemmtr_
+  dgemv_
+  dger_
+  dnrm2_
+@@ -48,7 +47,6 @@ EXPORTS
+  zdscal_
+  zgbmv_
+  zgemm_
+- zgemmtr_
+  zgemv_
+  zgerc_
+  zgeru_
+diff --git a/src/modules/lapack/cmplx.f b/src/modules/lapack/cmplx.f
+index 3bb15052ae..5d44e48f5d 100644
+--- a/src/modules/lapack/cmplx.f
++++ b/src/modules/lapack/cmplx.f
+@@ -35308,7 +35308,7 @@
+       EXTERNAL           LSAME, IZAMAX
+ *     ..
+ *     .. External Subroutines ..
+-      EXTERNAL           ZCOPY, ZDSCAL, ZGEMMTR, ZGEMV, ZLACGV,
++      EXTERNAL           ZCOPY, ZDSCAL, ZGEMV, ZLACGV,
+      $                   ZSWAP
+ *     ..
+ *     .. Intrinsic Functions ..
+@@ -35650,9 +35650,9 @@
+ *
+ *        (note that conjg(W) is actually stored)
+ *
+-         CALL ZGEMMTR( 'Upper', 'No transpose', 'Transpose', K, N-K,
+-     $                 -CONE, A( 1, K+1 ), LDA, W( 1, KW+1 ), LDW,
+-     $                 CONE, A( 1, 1 ), LDA )
++*        ZGEMMTR not implemented
++         INFO = -1
++         RETURN
+ *
+ *        Put U12 in standard form by partially undoing the interchanges
+ *        in columns k+1:n looping backwards from k+1 to n
+@@ -35997,9 +35997,9 @@
+ *
+ *        (note that conjg(W) is actually stored)
+ *
+-         CALL ZGEMMTR( 'Lower', 'No transpose', 'Transpose', N-K+1,
+-     $                 K-1, -CONE, A( K, 1 ), LDA, W( K, 1 ), LDW,
+-     $                 CONE, A( K, K ), LDA )
++*        ZGEMMTR not implemented
++         INFO = -1
++         RETURN
+ *
+ *        Put L21 in standard form by partially undoing the interchanges
+ *        of rows in columns 1:k-1 looping backwards from k-1 to 1
+@@ -51658,7 +51658,7 @@
+       EXTERNAL           LSAME, IZAMAX
+ *     ..
+ *     .. External Subroutines ..
+-      EXTERNAL           ZCOPY, ZGEMMTR, ZGEMV, ZSCAL, ZSWAP
++      EXTERNAL           ZCOPY, ZGEMV, ZSCAL, ZSWAP
+ *     ..
+ *     .. Intrinsic Functions ..
+       INTRINSIC          ABS, DBLE, DIMAG, MAX, MIN, SQRT
+@@ -51928,9 +51928,9 @@
+ *
+ *        A11 := A11 - U12*D*U12**T = A11 - U12*W**T
+ *
+-         CALL ZGEMMTR( 'Upper', 'No transpose', 'Transpose', K, N-K,
+-     $                 -CONE, A( 1, K+1 ), LDA, W( 1, KW+1 ), LDW,
+-     $                 CONE, A( 1, 1 ), LDA )
++*        ZGEMMTR not implemented
++         INFO = -1
++         RETURN
+ *
+ *        Put U12 in standard form by partially undoing the interchanges
+ *        in columns k+1:n looping backwards from k+1 to n
+@@ -52207,9 +52207,9 @@
+ *
+ *        A22 := A22 - L21*D*L21**T = A22 - L21*W**T
+ *
+-         CALL ZGEMMTR( 'Lower', 'No transpose', 'Transpose', N-K+1,
+-     $                 K-1, -CONE, A( K, 1 ), LDA, W( K, 1 ), LDW,
+-     $                 CONE, A( K, K ), LDA )
++*        ZGEMMTR not implemented
++         INFO = -1
++         RETURN
+ *
+ *        Put L21 in standard form by partially undoing the interchanges
+ *        of rows in columns 1:k-1 looping backwards from k-1 to 1
+diff --git a/src/modules/lapack/dlapack.f b/src/modules/lapack/dlapack.f
+index 284657d6b9..f0bd3e0867 100644
+--- a/src/modules/lapack/dlapack.f
++++ b/src/modules/lapack/dlapack.f
+@@ -92173,7 +92173,7 @@
+       EXTERNAL           LSAME, IDAMAX
+ *     ..
+ *     .. External Subroutines ..
+-      EXTERNAL           DCOPY, DGEMMTR, DGEMV, DSCAL, DSWAP
++      EXTERNAL           DCOPY, DGEMV, DSCAL, DSWAP
+ *     ..
+ *     .. Intrinsic Functions ..
+       INTRINSIC          ABS, MAX, MIN, SQRT
+@@ -92439,9 +92439,9 @@
+ *
+ *        A11 := A11 - U12*D*U12**T = A11 - U12*W**T
+ *
+-         CALL DGEMMTR( 'Upper', 'No transpose', 'Transpose', K, N-K,
+-     $                 -ONE, A( 1, K+1 ), LDA, W( 1, KW+1 ), LDW,
+-     $                 ONE, A( 1, 1 ), LDA )
++*        DGEMMTR not implemented
++         INFO = -1
++         RETURN
+ *
+ *        Put U12 in standard form by partially undoing the interchanges
+ *        in columns k+1:n looping backwards from k+1 to n
+@@ -92718,9 +92718,9 @@
+ *
+ *        A22 := A22 - L21*D*L21**T = A22 - L21*W**T
+ *
+-         CALL DGEMMTR( 'Lower', 'No transpose', 'Transpose', N-K+1,
+-     $                 K-1, -ONE, A( K, 1 ), LDA, W( K, 1 ), LDW,
+-     $                 ONE, A( K, K ), LDA )
++*        DGEMMTR not implemented
++         INFO = -1
++         RETURN
+ *
+ *        Put L21 in standard form by partially undoing the interchanges
+ *        of rows in columns 1:k-1 looping backwards from k-1 to 1

recipe/build-r-base.sh

@@ -328,7 +328,8 @@ Mingw_w64_makefiles() {
     echo "USE_CAIRO = YES"                              >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
     echo "CAIRO_LIBS = \"-lcairo -lfontconfig\""        >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
     echo "USE_LIBCURL = YES"                            >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
-    echo "CURL_LIBS = -lcurl"                           >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
+    echo "CURL_LIBS = -lcurl -L\"${PREFIX}/Library/lib\""                        >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
+    echo "CURL_PATH = ${PREFIX}/Library/"               >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
     echo "USE_ICU = YES"                                >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
     echo "ICU_PATH = ${PREFIX}/Library/"                >> "${SRC_DIR}/src/gnuwin32/MkRules.local"
     echo "ICU_LIBS = -licuin -licuuc -licudt -L\"${PREFIX}/Library/lib\""        >> "${SRC_DIR}/src/gnuwin32/MkRules.local"

recipe/meta.yaml

@@ -25,10 +25,10 @@ source:
       - 0014-Use-conda-s-tzdata-package.patch
       - 0015-Win32-Fix-COMPILED_BY-for-custom-GCC-pkgversion.patch
       - 0018-Fix-path-to-TCL-TK.patch
-      - 0019-Copy-dz-gemmtr.f-from-lapack-to-Rblas.patch  # [win]
+      - 0019-Remove-dgemmtr-and-zgemmtr.patch  # [win]
 
 build:
-  number: 0
+  number: 1
   no_link:
     - lib/R/doc/html/packages.html