Commit 72a107a6 authored by Barry Smith's avatar Barry Smith
Browse files

g++ 8.1 on the Apple Mac OS generates an error for void functions that return a value

Commit-type: bug-fix, portability-fix
parent 02e0df5a
CC = g++
CFLAGS = -g -O0
CODI_DIR = $(HOME)/git/CoDiPack
CFLAGS += -fpermissive -std=c++11 -I$(CODI_DIR)/include
AR = ar
AROPT = rcs
CODI_DIR = /Users/barrysmith/Src/petsc/arch-simple/include
AROPT = rcs
AR = /usr/bin/ar
CXX = g++-8
CFLAGS = -I$(CODI_DIR) -fstack-protector -g
......@@ -46,10 +46,10 @@
/* Function Body */
if (*n <= 0) {
return 0;
return;
}
if (*da == 0.) {
return 0;
return;
}
if (*incx == 1 && *incy == 1) {
goto L20;
......@@ -73,7 +73,7 @@
iy += *incy;
/* L10: */
}
return 0;
return;
/* code for both increments equal to 1 */
......@@ -91,7 +91,7 @@ L20:
/* L30: */
}
if (*n < 4) {
return 0;
return;
}
L40:
mp1 = m + 1;
......@@ -103,5 +103,5 @@ L40:
dy[i__ + 3] += *da * dx[i__ + 3];
/* L50: */
}
return 0;
return;
} /* daxpy_ */
......@@ -223,13 +223,13 @@
}
if (info != 0) {
xerbla_("DGEMM ", &info);
return 0;
return;
}
/* Quick return if possible. */
if (*m == 0 || *n == 0 || (*alpha == 0. || *k == 0) && *beta == 1.) {
return 0;
return;
}
/* And if alpha.eq.zero. */
......@@ -256,7 +256,7 @@
/* L40: */
}
}
return 0;
return;
}
/* Start the operations. */
......@@ -380,7 +380,7 @@
}
}
return 0;
return;
/* End of DGEMM . */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment