diff -up OpenMolcas-v21.02-41cee871945ac712e86ee971425a49a8fc60a936/src/Include/mma_allo_template.fh.linelen OpenMolcas-v21.02-41cee871945ac712e86ee971425a49a8fc60a936/src/Include/mma_allo_template.fh
--- OpenMolcas-v21.02-41cee871945ac712e86ee971425a49a8fc60a936/src/Include/mma_allo_template.fh.linelen	2021-05-06 18:45:09.507200295 +0000
+++ OpenMolcas-v21.02-41cee871945ac712e86ee971425a49a8fc60a936/src/Include/mma_allo_template.fh	2021-05-06 18:37:47.744971016 +0000
@@ -162,7 +162,8 @@
         integer(kind=iwp), intent(in) :: l1(2),l2(2),l3(2),l4(2),l5(2)
 #elif _DIMENSIONS_==7
         _TYPE_, allocatable, intent(inout) :: buffer(:,:,:,:,:,:,:)
-        integer(kind=iwp), intent(in) :: l1(2),l2(2),l3(2),l4(2),l5(2),l6(2),l7(2)
+        integer(kind=iwp), intent(in) :: l1(2),l2(2),l3(2),l4(2),l5(2)  &
+     &                                   ,l6(2),l7(2)
 #endif
         character(len=*), optional, intent(in) :: label
 #include "cptr2loff.fh"