Mercurial > repo

view interps/c-intercal/pit/random2.i @ 6342:8e6c7372226d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<\oren\> fetch http://www.orenwatson.be/u8tbl.c
author HackBot
date Sat, 28 Nov 2015 15:33:08 +0000
parents 859f9b4339e6
children
line wrap: on
line source

(1900)  DO STASH .2 + .3
        DO .3 <- #65535
        DO (1903) NEXT
(1903)  PLEASE FORGET #1
        DO .2 <- #0
        PLEASE %50 IGNORE .2
        DO .2 <- #1
        PLEASE REMEMBER .2
        DO .1 <- !1$.2'~"#65535$#1"
        DO .3 <- .3~#65534
        DO (1902) NEXT
        DO (1903) NEXT
(1902)  DO (1904) NEXT
        DO RETRIEVE .2 + .3
        DO FORGET #1
        PLEASE RESUME #1
(1904)  PLEASE RESUME '?"!3~.3'~#1"$#1'~#3