Changeset 3867 for palm/trunk/UTIL

Timestamp:

Apr 5, 2019 4:15:55 PM (6 years ago)

Author:

eckhard

Message:

Fix 'kinds.mod0' build issue

Location:

palm/trunk/UTIL

Files:

• Makefile_utilities (modified) (1 diff)
• inifor/src/inifor_defs.f90 (modified) (2 diffs)

palm/trunk/UTIL/Makefile_utilities

@@ -145 +145 @@
         inifor_defs.o \
         inifor_util.o
-inifor_defs.o: \
-        mod_kinds.o
 inifor_grid.o: \
         inifor_control.o \

palm/trunk/UTIL/inifor/src/inifor_defs.f90

@@ -101 +101 @@
  MODULE inifor_defs
  
- USE kinds,                                                                    &
-     ONLY :  wp, iwp
+ !USE kinds,                                                                    &
+ !    ONLY :  wp, iwp
 
  IMPLICIT NONE
@@ -108 +108 @@
 ! 
 !-- Parameters for type definitions
+ INTEGER, PARAMETER  ::  iwp = 8
+ INTEGER, PARAMETER  ::  wp = 8
  INTEGER, PARAMETER  ::  PATH  = 140 !< length of file path strings
  INTEGER, PARAMETER  ::  LNAME = 150 !< length of long name strings