Mercurial > repo

view interps/c-intercal/pit/icat.i @ 3904:49ab5b2e2ebf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<boily> echo -e "#!/usr/bin/env python\\n# -*- encoding: utf-8 -*-\\nimport sys\\nimport unicodedata\\ntry:\\n print u\'\'.join(map(unicodedata.lookup, sys.argv[1:])).encode(\'utf-8\')\\nexcept KeyError:\\n print u\'Unknown character.\'" >bin/unicode
author HackBot
date Fri, 11 Oct 2013 15:25:39 +0000
parents 859f9b4339e6
children
line wrap: on
line source

	PLEASE DO ,1 <- #1
	DO .4 <- #0
	DO .5 <- #0
	DO COME FROM (30)
	DO WRITE IN ,1
	DO .1 <- ,1SUB#1
	DO (10) NEXT
	PLEASE GIVE UP
(20)	PLEASE RESUME '?.1$#256'~'#256$#256'
(10)	DO (20) NEXT
	DO FORGET #1
	PLEASE DO .2 <- .4
	DO (1000) NEXT
	DO .4 <- .3~#255
	PLEASE DO .3 <- !3~#15'$!3~#240'
	DO .3 <- !3~#15'$!3~#240'
	DO .2 <- !3~#15'$!3~#240'
	PLEASE DO .1 <- .5
	DO (1010) NEXT
	DO .5 <- .2
	DO ,1SUB#1 <- .3
(30)	PLEASE READ OUT ,1