[cdftools] 207/228: JMM : change character lengh of input argument as * instead of fix 255

Alastair McKinstry mckinstry at moszumanska.debian.org
Fri Jun 12 08:21:50 UTC 2015


This is an automated email from the git hooks/post-receive script.

mckinstry pushed a commit to branch master
in repository cdftools.

commit 52cf4a6b4a8f2cd0dc5d2190482f26af5484cdd7
Author: molines <molines at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date:   Fri Apr 19 12:56:39 2013 +0000

    JMM : change character lengh of input argument as * instead of fix 255
    
    
    git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@655 1055176f-818a-41d9-83e1-73fbe5b947c5
---
 cdfio.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/cdfio.f90 b/cdfio.f90
index 8d0483b..a9b52ea 100644
--- a/cdfio.f90
+++ b/cdfio.f90
@@ -399,9 +399,9 @@ CONTAINS
     !!              long_name, short_name
     !!
     !!----------------------------------------------------------------------
-    CHARACTER(LEN=256), INTENT(in)  :: cdfile, cdvar
+    CHARACTER(LEN=*), INTENT(in)  :: cdfile, cdvar
     REAL(KIND=4), INTENT(out)       :: pmissing_value
-    CHARACTER(LEN=256), INTENT(out) :: cdunits, cdlong_name, cdshort_name
+    CHARACTER(LEN=*), INTENT(out) :: cdunits, cdlong_name, cdshort_name
 
     INTEGER(KIND=4) :: istatus
     INTEGER(KIND=4) :: incid, ivarid

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-science/packages/cdftools.git



More information about the debian-science-commits mailing list