RE: Free-Format Coding

["Jim Langston" <jlangston@xxxxxxxxxxx>]

I would suspect, in a future version of RPG, that the
extenders (h) and (e) and the like will be allowed without
the Eval and CallP keywords required.

 (h) X = Y;
 (e) Proto(X);

are both fairly straight forward, and non arbitrary.

#define (h)  Eval(h)
#define (e)  CallP(e)

would work in C, although I'm not so sure about the
recursion.  (would (e) X = Y; define out to:
CallPCallpCallpCallpCallpCallp... etc? <g>)

Regards,

Jim Langston

-----Original Message-----
From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
Behalf Of Brian Parkins
Sent: Friday, September 21, 2001 9:49 AM
To: rpg400-l@midrange.com
Subject: Free-Format Coding

The EVAL operation (and CALLP) are optional within a free-format block.
However, the opcodes MUST be coded if an opcode extender (e.g. H
half-adjust) is coded.  Please note that blanks are NOT permitted between
the opcode and the extender within a free-format block.

/Free

 Eval X = Y;         // This is OK
 Eval(h) X = Y;      // This is OK
 X = Y;              // This is OK

 Eval (h) X = Y:     // This is NOT OK

 CallP Proto(X);     // This is OK
 CallP(e) Proto(X);  // This is OK
 Proto(X);           // This is OK

 CallP (e) Proto(X); // This is NOT OK

/End-Free

Brian Parkins