Correct zgeadd_k prototype
authorMartin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Wed, 29 Nov 2017 18:57:35 +0000 (19:57 +0100)
committerGitHub <noreply@github.com>
Wed, 29 Nov 2017 18:57:35 +0000 (19:57 +0100)
common_param.h

index 0513ace..8f162c0 100644 (file)
@@ -888,7 +888,7 @@ BLASLONG (*ixamin_k)(BLASLONG, xdouble *, BLASLONG);
   int    (*sgeadd_k) (BLASLONG, BLASLONG, float, float *, BLASLONG, float, float *, BLASLONG); 
   int    (*dgeadd_k) (BLASLONG, BLASLONG, double, double *, BLASLONG, double, double *, BLASLONG); 
   int    (*cgeadd_k) (BLASLONG, BLASLONG, float, float,  float *,  BLASLONG, float, float, float *, BLASLONG); 
-  int    (*zgeadd_k) (BLASLONG, BLASLONG, float, double, double *, BLASLONG, double, double, double *, BLASLONG); 
+  int    (*zgeadd_k) (BLASLONG, BLASLONG, double, double, double *, BLASLONG, double, double, double *, BLASLONG); 
 
 } gotoblas_t;