diff options
| author | Igor Pashev <pashev.igor@gmail.com> | 2013-01-27 23:51:56 +0000 |
|---|---|---|
| committer | Igor Pashev <pashev.igor@gmail.com> | 2013-01-27 23:51:56 +0000 |
| commit | 6ab0c0f5bf14ed9c15370407b9ee7e0b4b089ae1 (patch) | |
| tree | 926065cf45450116098db664e3c61dced9e1f21a /ipl/progs/repro.icn | |
| download | icon-6ab0c0f5bf14ed9c15370407b9ee7e0b4b089ae1.tar.gz | |
Initial upstream version 9.4.3upstream/9.4.3
Diffstat (limited to 'ipl/progs/repro.icn')
| -rw-r--r-- | ipl/progs/repro.icn | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/ipl/progs/repro.icn b/ipl/progs/repro.icn new file mode 100644 index 0000000..c1d8264 --- /dev/null +++ b/ipl/progs/repro.icn @@ -0,0 +1,27 @@ +############################################################################ +# +# File: repro.icn +# +# Subject: Program to self-reproduce +# +# Author: Kenneth Walker +# +# Date: August 4, 2000 +# +############################################################################ +# +# This file is in the public domain. +# +############################################################################ +# +# This program generates the shortest known self-reproducing Icon +# program. The generated program is identical to this file except +# for deletion of this header and the "global x" declaration, which +# appear here so that the Icon library builds cleanly. +# +############################################################################ + +global x + +procedure main();x:="procedure main();x:= \nx[21]:=image(x);write(x);end" +x[21]:=image(x);write(x);end |