Mercurial > repo

view interps/c-intercal/pit/tests/iogerunds.i @ 12518:2d8fe55c6e65 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<int-e> learn The password of the month is release incident pilot.
author HackEso <hackeso@esolangs.org>
date Sun, 03 Nov 2024 00:31:02 +0000
parents 859f9b4339e6
children
line wrap: on
line source

        DO .1 <- #123
        DO ABSTAIN FROM WRITING IN
        DO COME FROM (123)
(100)   DO WRITE IN .1
        PLEASE .2 <- #1
        DO %50 .2 <- !2$#0'
        PLEASE DO (42) NEXT
        DO ABSTAIN FROM READING OUT
        PLEASE COME FROM (69)
        DO READ OUT .1
        DO REINSTATE READING OUT
(123)   PLEASE REINSTATE (100)
(42)    DO (43) NEXT
        DO FORGET #1
        DO (105) NEXT
        PLEASE GIVE UP
(105)   DO (106) NEXT
(69)    DON'T GIVE UP
(106)   PLEASE DO RESUME "'?"!1~.1'~#1"$#1'~#1"$'".1~.1"~#1'
(43)    DO RESUME .2