diff options
| author | Tom Smeding <tom@tomsmeding.com> | 2025-03-18 21:32:49 +0100 |
|---|---|---|
| committer | Tom Smeding <tom@tomsmeding.com> | 2025-03-18 21:32:49 +0100 |
| commit | 27c2823387b21e8ed801e4d8eeb0b3e5588a2920 (patch) | |
| tree | 8ae11687a9cc091b7569615fa6c92e2bd1f3509f | |
| parent | 6276ed3c7bcd20c8b860e1275386ecd068671bcc (diff) | |
arith: Don't FFI-import unused dotprod_*_strided ops
| -rw-r--r-- | src/Data/Array/Mixed/Internal/Arith/Foreign.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/Data/Array/Mixed/Internal/Arith/Foreign.hs b/src/Data/Array/Mixed/Internal/Arith/Foreign.hs index 969a25a..78d5365 100644 --- a/src/Data/Array/Mixed/Internal/Arith/Foreign.hs +++ b/src/Data/Array/Mixed/Internal/Arith/Foreign.hs @@ -20,7 +20,6 @@ $(do ,("reducefull_" ++ tyn, [t| CInt -> Int64 -> Ptr Int64 -> Ptr Int64 -> Ptr $ttyp -> IO $ttyp |]) ,("extremum_min_" ++ tyn, [t| Ptr Int64 -> Int64 -> Ptr Int64 -> Ptr Int64 -> Ptr $ttyp -> IO () |]) ,("extremum_max_" ++ tyn, [t| Ptr Int64 -> Int64 -> Ptr Int64 -> Ptr Int64 -> Ptr $ttyp -> IO () |]) - ,("dotprod_" ++ tyn ++ "_strided", [t| Int64 -> Int64 -> Int64 -> Ptr $ttyp -> Int64 -> Int64 -> Ptr $ttyp -> IO $ttyp |]) ,("dotprodinner_" ++ tyn, [t| Int64 -> Ptr Int64 -> Ptr $ttyp -> Ptr Int64 -> Ptr $ttyp -> Ptr Int64 -> Ptr $ttyp -> IO () |]) ] |