diff options
Diffstat (limited to 'libgfortran/m4/matmull.m4')
-rw-r--r-- | libgfortran/m4/matmull.m4 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libgfortran/m4/matmull.m4 b/libgfortran/m4/matmull.m4 index 4091ef65f2e..131de03e0c3 100644 --- a/libgfortran/m4/matmull.m4 +++ b/libgfortran/m4/matmull.m4 @@ -28,11 +28,11 @@ include(iparm.m4)dnl /* 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. */ -extern void `__matmul_'rtype_code (rtype *, gfc_array_l4 *, gfc_array_l4 *); -export_proto_np(`__matmul_'rtype_code); +extern void matmul_`'rtype_code (rtype *, gfc_array_l4 *, gfc_array_l4 *); +export_proto(matmul_`'rtype_code); void -`__matmul_'rtype_code (rtype * retarray, gfc_array_l4 * a, gfc_array_l4 * b) +matmul_`'rtype_code (rtype * retarray, gfc_array_l4 * a, gfc_array_l4 * b) { GFC_INTEGER_4 *abase; GFC_INTEGER_4 *bbase; |