0

Does anyone know the meaning of 4HEND in the following line which comes from an old Fortran code?

DATA XHEND / 4HEND /

BenMorel
  • 34,448
  • 50
  • 182
  • 322
John Tab
  • 35
  • 4

2 Answers2

5

4HEND is a Hollerith code to represent the character string "END ". In very old FORTRAN, the variable XHEND might even be a 4-byte integer or real used to hold character data. If implicit typing was in effect in this program, XHEND would have been a real. Another recent question with Hollerith codes: Writing both characters and digits in an array

Community
  • 1
  • 1
M. S. B.
  • 28,968
  • 2
  • 46
  • 73
0

It replaces assignment

XHEND='END '
Jacob Seleznev
  • 8,013
  • 3
  • 24
  • 34
  • 3
    It doesn't always replace the assignment. Variables in subroutines and in functions, initialised with `DATA` statements, are also implicitly saved as if they were used in a `SAVE` statement. – Hristo Iliev Aug 08 '12 at 11:11