diff interps/clc-intercal/CLC-INTERCAL-Docs-1.-94.-2/doc/examples/threads.ti @ 996:859f9b4339e6

<Gregor> tar xf egobot.tar.xz
author HackBot
date Sun, 09 Dec 2012 19:30:08 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/interps/clc-intercal/CLC-INTERCAL-Docs-1.-94.-2/doc/examples/threads.ti	Sun Dec 09 19:30:08 2012 +0000
@@ -0,0 +1,29 @@
+	PLEASE NOTE: This program demonstrates "Threaded INTERCAL" style
+		     threads, where multiple "COME FROM"s are allowed
+		     corresponding to each label, and each "COME FROM"
+		     proceeds as a separate thread.
+
+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.
+
+(1)	DON'T GIVE UP
+
+	PLEASE COME FROM (1)
+	DO .1 <- #1
+	DO READ OUT .1               DO NOTE THAT THIS READS "I"
+	DO .1 <- .1 ¢ .1
+	DO READ OUT .1               DO NOTE THAT THIS READS "III"
+	PLEASE GIVE UP
+
+	DO COME FROM (1)
+	DO .2 <- #2
+	DO READ OUT .2               DO NOTE THAT THIS READS "II"
+	DO .2 <- .2 ¢ .2
+	DO READ OUT .2               DO NOTE THAT THIS READS "XII"
+	PLEASE GIVE UP
+
+	PLEASE NOTE: THE OUTPUT IS I, III INTERLEAVED WITH II, XII
+