Loops/Infinite: Difference between revisions
→{{header|Io}}: Add INTERCAL
(→{{header|Scheme}}: add less verbose option.) |
(→{{header|Io}}: Add INTERCAL) |
||
Line 407:
<lang IDL>while 1 do print,'SPAM'</lang>
=={{header|INTERCAL}}==
Assuming Turing Text I/O with 8-bit ASCII-compatible character set, using COME FROM:
<lang intercal> NOTE THIS IS INTERCAL
PLEASE ,1 <- #5
DO ,1 SUB #1 <- #54
DO ,1 SUB #2 <- #192
DO ,1 SUB #3 <- #136
PLEASE ,1 SUB #4 <- #208
DO ,1 SUB #5 <- #98
PLEASE COME FROM (100)
DO READ OUT ,1
(200) DO ,1 SUB #1 <- #134
PLEASE ABSTAIN FROM (200)
(100) DO READ OUT ,1</lang>
=={{header|Io}}==
<lang io>loop("SPAM" println)</lang>
|