summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2015-01-21 21:18:31 -0500
committerDavid Thompson <dthompson2@worcester.edu>2015-01-21 21:18:31 -0500
commit20321008e714598f351aa2889abc435f5115feda (patch)
tree549d68f74156a43b19c0596a244f25f543de85f8
parent5ce85e62e52fe9a36456dff5e83ff2dc594ba285 (diff)
wrappers: gsl: Add cblas-sgemv wrapper.
-rw-r--r--sly/wrappers/gsl.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/sly/wrappers/gsl.scm b/sly/wrappers/gsl.scm
index da35b2c..f05f4ae 100644
--- a/sly/wrappers/gsl.scm
+++ b/sly/wrappers/gsl.scm
@@ -25,7 +25,8 @@
#:use-module (system foreign)
#:export (cblas-row-major
cblas-no-trans
- cblas-sgemm))
+ cblas-sgemm
+ cblas-sgemv))
;;;
;;; Constants
@@ -47,3 +48,7 @@
(define-foreign cblas-sgemm
void "cblas_sgemm" (list int int int int int int float '*
int '* int float '* int))
+
+(define-foreign cblas-sgemv
+ void "cblas_sgemv" (list int int int int float '* int '*
+ int float '* int))