Path: utzoo!censor!geac!torsqnt!lethe!yunexus!ists!helios.physics.utoronto.ca!news-server.csri.toronto.edu!cs.utexas.edu!wuarchive!uunet!mcsun!hp4nl!let.rug.nl!gufal02.let.rug.nl!gosse
From: gosse@gufal02.let.rug.nl (Gosse Bouma)
Newsgroups: comp.lang.prolog
Subject: Re: returning self
Message-ID: <1513@gufalet.let.rug.nl>
Date: 15 Jan 91 13:54:49 GMT
References: <9101130738.AA04684@daya.wisdom.weizmann.ac.il>
Sender: news@let.rug.nl
Organization: Faculty of Arts, Groningen, The Netherlands
Lines: 19
Nntp-Posting-Host: gufal02.let.rug.nl

Yet another program printing its own code (no variable renaming or
omission of the '.' this time).


slf :- freeze(X,(name(Y,X),write(Y),write(X),write('.'))),
X=[115,108,102,32,58,45,32,102,114,101,101,122,101,40,88,44,40,110,97,109,101,
40,89,44,88,41,44,119,114,105,116,101,40,89,41,44,119,114,105,116,101,40,
88,41,44,119,114,105,116,101,40,39,46,39,41,41,41,44,10,88,61].


Gosse Bouma, Alfa-informatica, RUG, Groningen	       gosse@let.rug.nl

	All we cry, all we contend for, in this world of toil and blood,
	is beneath the notice of the hacker we call God.   (Th. Pynchon)
--
Gosse Bouma, Alfa-informatica, RUG, Groningen	       gosse@gufalet.let.rug.nl

	All we cry, all we contend for, in this world of toil and blood,
	is beneath the notice of the hacker we call God.   (Th. Pynchon)