Mercurial > repo

view interps/clc-intercal/CLC-INTERCAL-Docs-1.-94.-2/doc/examples/quantum/next.ni @ 12509:2255eb45a711 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<wib_jonas> `` </hackenv/tmp/cmd.whatis tr -d \\\\r | grep cmd | cat -v >> /hackenv/share/whatis
author HackEso <hackeso@esolangs.org>
date Wed, 17 Jul 2024 14:42:40 +0100
parents 859f9b4339e6
children
line wrap: on
line source

	PLEASE NOTE: This program demonstrates the use of quantum nexting.

	Requires CLC-INTERCAL 1.-94 with the "NEXT" extension.

Copyright (c) 2006 Claudio Calvelli, all rights reserved.

CLC-INTERCAL is copyrighted software. However, permission to use, modify,
and distribute it is granted provided that the conditions set out in the
licence agreement are met. See files README and COPYING in the distribution.

	DO (1) NEXT WHILE NOT NEXTING
	DO .1 <- #1
	DO READ OUT .1
	DO GIVE UP

(1)	DO .2 <- #2
	DO READ OUT .2
	DO (2) NEXT
	PLEASE GIVE UP

(2)	PLEASE RESUME #2