Mercurial > repo

view interps/c-intercal/pit/tests/testcf.i @ 10776:b474172c9892

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<b_jonas> slashlearn ance//Spelling of -ance/-ence words: advance, science, conference, experience, finance, insurance, licence, performance, reference, assistance, balance, defence, difference, distance, evidence, acceptance, appliance, audience, compliance, importance, influence, instance, intelligence, maintenance, preference, presence, sentence, sequence, substance, violence, absence, accordance, alliance, appearance, assurance, attendance, circumstance, clea
author HackBot
date Fri, 21 Apr 2017 18:06:38 +0000
parents 859f9b4339e6
children
line wrap: on
line source

	DO COME FROM (80)
	PLEASE %50 REINSTATE (10)
        DO .1 <- #1
(10)    DO NOT %99 .1 <- #2
        DO .1 <- #3
	PLEASE COME FROM (10)
        DO READ OUT .1
        DO .1 <- #1
(20)    DO %50 .1 <- #2
        DO .1 <- #3
(30)	PLEASE %50 COME FROM (20)
	DO LOSE
	PLEASE %90 COME FROM (30)
(40)	PLEASE ABSTAIN FROM (50)
        DO READ OUT .1
(50)	PLEASE COME FROM (40)
(60)	DO (70) NEXT
        DO GIVE UP
(70)	DO READ OUT #65535
	DO RESUME #1
	DO WIN
(80)	DO COME FROM (60)