HP3000-L Archives

May 2008, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Matthew Perdue <[log in to unmask]>
Reply To:
Matthew Perdue <[log in to unmask]>
Date:
Sat, 17 May 2008 21:17:48 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (38 lines)
Duane writes:

 I hope you are 'guessing' :-)

Because you are not correct in your analysis...

COBOL is smart enough to know that 0 and zero are equivalent to 0.0000.

My previous post is the answer, assuming you actually read the post :-)

And BTW, '9.V9(4)' is not a valid COBOL picture. You can have '.' or 'V',
but not both at the same time.

... to my post:

Quoting Michael:
"IF MYTEST <> 0 GO TO FTN2090."
use
IF MYTEST <> ZERO GO TO FTN2090.
or
IF MYTEST NOT = ZERO GO TO FTN2090.
Either tells the compiler to generate code to match the internal variable
type, instead of the decimal 0, which doesn't match because it isn't defined
as 9.V9(4) - it would be 9.

... and I add:

my turn at the "don't click 'send' to fast" stocks :)

The compiler would catch the 9.v9(4) typing and brain gears slipping error.

The 0 or ZERO dilemma was an observational statement, not a guess, from a
problem that thrust up it's rather unwelcome existence back around 1992 or
so with the compiler on MPE/XL, leading to a preference for the ZERO syntax.

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2