OpenEuphoria

Re: Command Line Continuation

• Posted by "Igor Kachan" <kinz at peterlink.ru> Sep 19, 2004
• 477 views

Hi, Pete!

You wrote:

[snip]

> One of the most stupid things I ever wasted 
>  my time on is the following program, which 
>  should scare you somewhat, but I think it
> proves a point 
> 
> }}}
<eucode>
> -- goto.exw: usage exw goto.exw <file>
> constant togo="goto" type 
> goto(integer 
> goto) return 
> goto=
> goto end type type
> goto_s(sequence
> goto) return equal(
> goto,
> goto) end type
> goto 
> goto_t, 
> goto_u procedure 
> goto_a(
> goto 
> goto) 
> goto_t+=
> goto if 
> goto then 
> goto_u=
> goto end if end procedure procedure 
> goto_b(
> goto 
> goto) 
> goto_u=
> goto_u*
> goto+1 
> goto_a(
> goto_u=
> goto*5) end procedure function 
> goto_c(
> goto 
> goto) 
> goto_b(
> goto=togo[
> goto_u]) return 
> goto!=-1 end function procedure 
> goto_d(
> goto 
> goto) 
> goto_u=
> goto!=1 
> goto_t=
> goto=0 while 
> goto_c(getc(
> goto)) do end while close(
> goto) printf(1,"%d goto \'s\n",
> goto_t) end procedure procedure 
> goto_x(
> goto_s
> goto) 
> goto_d(open(
> goto[length(
> goto)],"r")) end procedure
> goto_x(command_line())
> </eucode>
{{{


LOLLLLL!     

I think, Rob needs a separate section in his Archive
to keep such the jokes. 

Submit it to Rob!

Good Luck!

Regards,
Igor Kachan
kinz at peterlink.ru