Leave out the Fortran character length arguments when compiling with emscripten

This commit is contained in:
martin-frbg 2022-12-14 14:02:36 +01:00
parent ff9a9222e3
commit 5b14be1f35
1 changed files with 5 additions and 1 deletions

View File

@ -34,7 +34,11 @@
lapack_logical LAPACKE_lsame( char ca, char cb ) 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
);
} }