Leave out the Fortran character length arguments when compiling with emscripten

2022-12-14 14:02:36 +01:00 · 2022-12-14 14:02:36 +01:00 · 5b14be1f35
parent ff9a9222e3
commit 5b14be1f35
1 changed files with 5 additions and 1 deletions
--- a/lapack-netlib/LAPACKE/utils/lapacke_lsame.c
+++ b/lapack-netlib/LAPACKE/utils/lapacke_lsame.c
@ -34,7 +34,11 @@

 lapack_logical LAPACKE_lsame( char ca,  char cb )
 {
-    return (lapack_logical) LAPACK_lsame( &ca, &cb, 1, 1 );
+    return (lapack_logical) LAPACK_lsame( &ca, &cb
+#ifndef __EMSCRIPTEN__
+, 1, 1
+#endif
+ );
 }