We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
ilp64
1 parent d40e088 commit 0a6b907Copy full SHA for 0a6b907
src/stdlib_linalg_constants.fypp
@@ -29,13 +29,13 @@ module stdlib_linalg_constants
29
logical(lk), parameter :: external_lapack_ilp64 = .false._lk
30
#endif
31
32
- ! Generic checks
+ ! Generic checks for external libraries
33
logical(lk), parameter :: external_blas = external_blas_ilp32 .or. external_blas_ilp64
34
logical(lk), parameter :: external_lapack = external_lapack_ilp32 .or. external_lapack_ilp64
35
36
! Support both 32-bit (ilp) and 64-bit (ilp64) integer kinds
37
integer, parameter :: ilp = int32
38
- integer, parameter :: ilp64 = int64
+ integer, parameter :: ilp64 = #{if WITH_ILP64}# int64 #{else}# -1 #{endif}#
39
private :: int32, int64
40
41
end module stdlib_linalg_constants
0 commit comments