Inverted syntax: Difference between revisions
→{{header|Phix}}
(Added Nim example) |
|||
Line 834:
} until $answer ~~ 42;</lang>
You can't just put the <tt>my</tt> on the <tt>$answer</tt> in the block because the conditional is outside the scope of the block, and would not see the declaration.
=={{header|Phix}}==
original... the got still you've as long as ,itself compile/run to used be can This
<lang Phix>if end
(&"test.exw"[1]cl)system
then >2(cl)length if
(&"\n"(pgm)mung,"test.exw")write_file = {}
write_file.e include
([$]cl)get_text = pgm string
()command_line = cl sequence
function end
("\n",lines)join return
for end (nup,rip,((([i]lines)split)reverse)join)substitute_all = [i]lines do (lines)length to 1=i for
(("\n",(rip,pun,pgm)substitute_all)split)reverse=lines sequence
(pgm string)mung function
(true,"*",("*","",3,7," -<>{}@! ")join_by)split = rip constant
(true,"*",("*","",1,7,"-,=][)(")join_by)split = nup constant
(true,"*",("*","",1,7,"-,=[]()")join_by)split = pun constant
demo\rosetta\inverted_syntax.exw --</lang>
=={{header|PicoLisp}}==
| |||