diff options
Diffstat (limited to 'libgfortran/generated/matmul_l4.c')
| -rw-r--r-- | libgfortran/generated/matmul_l4.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libgfortran/generated/matmul_l4.c b/libgfortran/generated/matmul_l4.c index ff32eb4..da66814 100644 --- a/libgfortran/generated/matmul_l4.c +++ b/libgfortran/generated/matmul_l4.c @@ -33,6 +33,8 @@ Boston, MA 02110-1301, USA. */ #include <assert.h> #include "libgfortran.h" +#if defined (HAVE_GFC_LOGICAL_4) + /* Dimensions: retarray(x,y) a(x, count) b(count,y). Either a or b can be rank 1. In this case x or y is 1. */ @@ -190,3 +192,5 @@ matmul_l4 (gfc_array_l4 * retarray, gfc_array_l4 * a, gfc_array_l4 * b) dest += rystride - (rxstride * xcount); } } + +#endif |