Is this a hex constant? 1

jamez05 · Nov 16, 2005

The following variables are declared as bytes:

Code:

byte ch, scratch(120)

later on in the code, a variable is set to 1h:

Code:

if (len.lt.120)scratch(len+1)=1h

1h is not a declared variable, so I'm assuming its hex.

Later, the following code appears:

Code:

if (1h1.le.ch.and.ch.le.1h9)

I'm not sure how to interpret that. Any insight is appreaciated.

xwb · Nov 16, 2005

I've never seen Hollerith characters used like this but I suppose it is legal in F77.

Code:

if (len.lt.120)scratch(len+1)=1h
if (len.lt.120)scratch(len+1)=' '

if (1h1 .le. ch .and. ch .le. 1h9) 
if ('1' .le. ch .and. ch .le. '9')

jamez05 · Nov 16, 2005

Thanks again xwb. I looked up Hollerith characters and was able to figure out what's going on.

Boy is some of this code strange:

Code:

if (ch.EQ.1H-)

zeitghost · Nov 16, 2005

I've never seen that either.

Good idea though.

I've seen programs with embedded control characters and it's quite tricky to edit...