ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: Add guile-ffi-cblas.

Browse source 
* gnu/packages/guile-xyz.scm (guile-ffi-cblas): New variable.
This commit is contained in:
Ludovic Courtès 2023-06-20 16:58:29 +02:00 committed by Ludovic Courtès
parent bcdff1d9fc
commit cec5cdce7c
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 44 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

44
gnu/packages/guile-xyz.scm
View file

@ -4062,6 +4062,50 @@ (define-public guile-cv
clean and easy to use high level API.")
(license license:gpl3+)))
(define-public guile-ffi-cblas
(let ((commit "4458d50f84786d7ace0181c6588345eed7474996")
(revision "0"))
(package
(name "guile-ffi-cblas")
(version (git-version "0.0.0" revision commit))
(home-page "https://github.com/lloda/guile-ffi-cblas")
(source (origin
(method git-fetch)
(uri (git-reference (url home-page)
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"050s0lq64v286hkxqczkfkx3fp1vr3jm5w236hxx67br9najb1cp"))))
(build-system guile-build-system)
(arguments
(list #:source-directory "mod"
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'set-blas-file-name
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "mod/ffi/cblas.scm"
(("\"libcblas\"")
(string-append "\""
(search-input-file
inputs "/lib/libopenblas.so")
"\"")))))
(add-after 'build 'check
(lambda _
(invoke "guile" "-C" "mod" "-L" "mod"
"test/test-ffi-cblas.scm"))))))
(native-inputs (list guile-3.0))
(inputs (list openblas))
(synopsis "Guile bindings for CBLAS, the linear algebra library")
(description
"This package provides Guile FFI bindings for CBLAS, the library of
linear algebra subprograms.
To use the bindings, import @code{(ffi cblas)}. CBLAS will be loaded from the
default dynamic library path. There are up to three bindings for each
function: raw, typed, and functional.")
(license license:lgpl3+))))
(define-public guile-ffi-fftw
(let ((commit "294ad9e7491dcb40026d2fec9be2af05263be1c0")
(revision "2"))