aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/generated/parity_l1.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/parity_l1.c')
-rw-r--r--libgfortran/generated/parity_l1.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/libgfortran/generated/parity_l1.c b/libgfortran/generated/parity_l1.c
index fe4e5c8..2920799 100644
--- a/libgfortran/generated/parity_l1.c
+++ b/libgfortran/generated/parity_l1.c
@@ -51,6 +51,10 @@ parity_l1 (gfc_array_l1 * const restrict retarray,
index_type dim;
int continue_loop;
+#ifdef HAVE_BACK_ARG
+ assert(back == 0);
+#endif
+
/* Make dim zero based to avoid confusion. */
rank = GFC_DESCRIPTOR_RANK (array) - 1;
dim = (*pdim) - 1;