Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!linus!philabs!seismo!harpo!eagle!mhuxl!houxm!ihnp4!inuxc!pur-ee!uiucdcs!uokvax!andree
From: andree@uokvax.UUCP
Newsgroups: net.lang
Subject: CLU sample/query. - (nf)
Message-ID: <3944@uiucdcs.UUCP>
Date: Fri, 18-Nov-83 22:54:06 EST
Article-I.D.: uiucdcs.3944
Posted: Fri Nov 18 22:54:06 1983
Date-Received: Sun, 20-Nov-83 01:16:54 EST
Lines: 30

#N:uokvax:9000004:000:729
uokvax!andree    Nov 17 15:23:00 1983

Here is a Merry Chirstmas program in CLU:

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                   %
%  Print Merry Christmas 15 times.  %
%                                   %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

start_up = proc () 

	out : stream := stream$primary_input()

	for i : int in int$from_to(1, 15) do
		stream$putl(out, "Merry Christmas")
		end
	end start_up


To avoid making this a total waste of net bandwidth, I'll take
this chance to ask if there's someone (anyone?) else out there
using CLU. Is there by some chance a net.lang.clu?

	<mike
	
P.S. I don't have a favorite language. None of the ones available
qualify.  BASIC is a loss, Pascal not far behind. C is
tolerable, but antiquated.