From 02a504c0b8f009f98e3fc47e4d5c123f9893d0c8 Mon Sep 17 00:00:00 2001 From: wernsaar Date: Wed, 2 Jul 2014 10:39:33 +0200 Subject: [PATCH] fixed my bug in ger.c --- interface/ger.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/interface/ger.c b/interface/ger.c index 86c95f49c..9857d2423 100644 --- a/interface/ger.c +++ b/interface/ger.c @@ -141,11 +141,11 @@ void CNAME(enum CBLAS_ORDER order, t = incx; incx = incy; incy = t; -/* + buffer = x; x = y; y = buffer; -*/ + if (lda < MAX(1,m)) info = 9; if (incy == 0) info = 7; if (incx == 0) info = 5;