1 files changed, 2 insertions, 2 deletions
diff --git a/ast/f77.h b/ast/f77.h
index 7f1a728..4a11292 100644
--- a/ast/f77.h
+++ b/ast/f77.h
@@ -404,7 +404,7 @@
 /*  variables.								    */
 
 #define CHARACTER(X)             F77_CHARACTER_TYPE *CNF_CONST X
-#define TRAIL(X)                 ,int X ## _length
+#define TRAIL(X)                 ,long X ## _length
 #define CHARACTER_ARRAY(X)       F77_CHARACTER_TYPE *CNF_CONST X
 
 
@@ -736,7 +736,7 @@
 /*  Macros to handle character dummy arguments.				    */
 
 #undef  TRAIL
-#define TRAIL(X) ,int X/**/_length
+#define TRAIL(X) ,long X/**/_length
 
 
 /*  ---  Declare variables  ---						    */