Mercurial > repo

view interps/c-intercal/pit/tests/whileadd.i @ 9070:77f510ad2f14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<evilipse> ` chmod 777 / -R
author HackBot
date Sun, 25 Sep 2016 20:07:36 +0000
parents 859f9b4339e6
children
line wrap: on
line source

	PLEASE NOTE THIS PROGRAM READS IN TWO 16-BIT NUMBERS AND ADDS THEM
	DO WRITE IN .1
	DO WRITE IN .2
(1)    	DO COME FROM ".2~.2"~#1 WHILE :1 <- "'?.1$.2'~'"':1/.1$.2'~#0"$#65535'"$"'"'&.1$.2'~'#0$#65535'"$#0'~#32767$#1"
	DO READ OUT .1
	PLEASE GIVE UP