Add missing wrappers in libblas.jl

Author: amontoison

src/libblas.jl

@@ -1,3 +1,45 @@
+function drot(n, dx, incx, dy, incy, c, s)
+    return ccall((@blasfunc(drot_), libblastrampoline), Cvoid,
+                 (Ref{BlasInt}, Ptr{Float64}, Ref{BlasInt}, Ptr{Float64}, Ref{BlasInt},
+                  Ref{Float64}, Ref{Float64}),
+                 n, dx, incx, dy, incy, c, s)
+end
+
+function srot(n, sx, incx, sy, incy, c, s)
+    return ccall((@blasfunc(srot_), libblastrampoline), Cvoid,
+                 (Ref{BlasInt}, Ptr{Float32}, Ref{BlasInt}, Ptr{Float32}, Ref{BlasInt},
+                  Ref{Float32}, Ref{Float32}),
+                 n, sx, incx, sy, incy, c, s)
+end
+
+function zdrot(n, zx, incx, zy, incy, c, s)
+    return ccall((@blasfunc(zdrot_), libblastrampoline), Cvoid,
+                 (Ref{BlasInt}, Ptr{ComplexF64}, Ref{BlasInt}, Ptr{ComplexF64}, Ref{BlasInt},
+                  Ref{Float64}, Ref{Float64}),
+                 n, zx, incx, zy, incy, c, s)
+end
+
+function csrot(n, cx, incx, cy, incy, c, s)
+    return ccall((@blasfunc(csrot_), libblastrampoline), Cvoid,
+                 (Ref{BlasInt}, Ptr{ComplexF32}, Ref{BlasInt}, Ptr{ComplexF32}, Ref{BlasInt},
+                  Ref{Float32}, Ref{Float32}),
+                 n, cx, incx, cy, incy, c, s)
+end
+
+function zrot(n, zx, incx, zy, incy, c, s)
+    return ccall((@blasfunc(zrot_), libblastrampoline), Cvoid,
+                 (Ref{BlasInt}, Ptr{ComplexF64}, Ref{BlasInt}, Ptr{ComplexF64}, Ref{BlasInt},
+                  Ref{Float64}, Ref{ComplexF64}),
+                 n, zx, incx, zy, incy, c, s)
+end
+
+function crot(n, dx, incx, dy, incy, c, s)
+    return ccall((@blasfunc(crot_), libblastrampoline), Cvoid,
+                 (Ref{BlasInt}, Ptr{ComplexF32}, Ref{BlasInt}, Ptr{ComplexF32}, Ref{BlasInt},
+                  Ref{Float32}, Ref{ComplexF32}),
+                 n, cx, incx, cy, incy, c, s)
+end
+
 function srotg(a, b, c, s)
     return ccall((@blasfunc(srotg_), libblastrampoline), Cvoid,
                  (Ref{Float32}, Ref{Float32}, Ref{Float32}, Ref{Float32}), a, b, c, s)