Changeset 555 for palm/trunk/UTIL
- Timestamp:
- Sep 7, 2010 7:32:53 AM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/UTIL/interpret_config.f90
r313 r555 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! bugfix in WRITE (2010) statement6 ! bugfix in 2201 statement: closing " was missing 7 7 ! mrun environment variables are read from NAMELIST instead of using GETENV. 8 8 ! Variables are allways assigned a value, also if they already got one. These … … 195 195 IF ( do_trace(1:4) == 'true' ) THEN 196 196 WRITE (2,2201) bs, var(1:ivar), value(1:ivalue) 197 2201 FORMAT ('printf "',A,'n*** ENVIRONMENT-VARIABLE ',A,' = ',A )197 2201 FORMAT ('printf "',A,'n*** ENVIRONMENT-VARIABLE ',A,' = ',A,'"') 198 198 ENDIF 199 199
Note: See TracChangeset
for help on using the changeset viewer.