Mercurial > repo

view interps/c-intercal/pit/lib/plus.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

(2000)	PLEASE DO STASH .1 + .2 + .3
	DO .2 <- #1
	DO (2001) NEXT
(2001)	PLEASE FORGET #1
	DO .3 <- "?!1~#1'$#1"~#3
	DO (2002) NEXT
	PLEASE DO .2 <- !2$#1'~'#65535$#1'
	DO .1 <- .1~#65534
	DO (2001) NEXT
(2002)	PLEASE DO (2003) NEXT
	DO RETRIEVE .1
	DO .3 <- .1
	PLEASE DO .1 <- '?.2$.3'~'#0$#65535'
	DO RETRIEVE .2 + .3
	DO RESUME #2
(2003)	DO RESUME .3