RE: ENDIF in CLP

[Kurt Anderson <kurt.anderson@xxxxxxxxxxxxxx>]

And by "most" I mean RPG of course.  Haha.  Though I did mean things such as {} within C++ and Java.  

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Kurt Anderson
Sent: Friday, October 23, 2009 8:30 AM
To: 'Midrange Systems Technical Discussion'
Subject: RE: ENDIF in CLP

My guess is that the programmer wanted to visualize the close of the condition.  I can't say I'd ever do that, but I completely understand the desire to.  You know, like how most non-CLP languages close conditions.  ;)

That said, if I were taking ownership of the program, that EndIf would be deleted so fast... 

-Kurt

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Jeff Crosby
Sent: Friday, October 23, 2009 7:34 AM
To: Midrange Systems Technical Discussion
Subject: Re: ENDIF in CLP

So many thoughts . . . so little time.

And the ENDIF is actually commented out?


On Fri, Oct 23, 2009 at 6:07 AM, David FOXWELL <David.FOXWELL@xxxxxxxxx> wrote:
> I just came across this amusing piece of code and thought I'd share it.
>
>  IF (&field1 *NE 'y' *AND &field2 *NE 'y') +
>     GOTO ABORT
> /*ENDIF*/
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.