summaryrefslogtreecommitdiff
path: root/libgfortran/generated/bessel_r16.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/bessel_r16.c')
-rw-r--r--libgfortran/generated/bessel_r16.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/generated/bessel_r16.c b/libgfortran/generated/bessel_r16.c
index d5ca883e899..da9ab9760c5 100644
--- a/libgfortran/generated/bessel_r16.c
+++ b/libgfortran/generated/bessel_r16.c
@@ -70,7 +70,7 @@ bessel_jn_r16 (gfc_array_r16 * const restrict ret, int n1, int n2, GFC_REAL_16 x
&& GFC_DESCRIPTOR_EXTENT(ret,0) != (n2-n1+1))
runtime_error("Incorrect extent in return value of BESSEL_JN "
"(%ld vs. %ld)", (long int) n2-n1,
- GFC_DESCRIPTOR_EXTENT(ret,0));
+ (long int) GFC_DESCRIPTOR_EXTENT(ret,0));
stride = GFC_DESCRIPTOR_STRIDE(ret,0);
@@ -138,7 +138,7 @@ bessel_yn_r16 (gfc_array_r16 * const restrict ret, int n1, int n2,
&& GFC_DESCRIPTOR_EXTENT(ret,0) != (n2-n1+1))
runtime_error("Incorrect extent in return value of BESSEL_JN "
"(%ld vs. %ld)", (long int) n2-n1,
- GFC_DESCRIPTOR_EXTENT(ret,0));
+ (long int) GFC_DESCRIPTOR_EXTENT(ret,0));
stride = GFC_DESCRIPTOR_STRIDE(ret,0);