К вопросу об интроспективных программах

[tipok]

Так, ради смеха: http://lurkmore.ru/Haskell

[amrok]

Хаскель сделал "Hello world" доступным только математикам!

[ZLoykif]

Гиковское письмо счастья?)
ПС: Что то у тебя строчка длинная получилась. [code]тест[/code]

[blv]

Не решился строчку кропсать - там все байт в байт выводиться :)

[ptiss]

самая короткая, имхо, на баше.
#!/bin/sh
cat $0

[dime]

Самая короткая на одном из диалектов бейсика:
10 LIST
на чуть более продвинутом - без метки:
LIST

[ptiss]

можно ещё опустить указание интерпритатора:
cat $0
и вызывать как sh script.sh

[efix]

можно еще короче:
(в консоли)
$ сat
и программа выводится прямо во время написания! :)

[katremer]

Самая короткая на HQ9+:

Q

[katremer]

Ну и на PHP самый короткий, но неинтересный: пустой файл.

[nixmale]

Недооцениваете вы php…

<?php
function a($b)
{
return str_replace("'", "\'", str_replace("\\", "\\\\", $b));
}
$e = '; echo $h . $f . a($h) . $f . $e; ?>';
$f = "'";
$g = "\\";
$h = '<?php
function a($b)
{
return str_replace("\'", "\\\'", str_replace("\\\\", "\\\\\\\\", $b));
}
$e = \'; echo $h . $f . a($h) . $f . $e; ?>\';
$f = "\'";
$g = "\\\\";
$h = '; echo $h . $f . a($h) . $f . $e; ?>


[ptiss]

а этот язык и был для того придуман. по крайней мере печать своего исходника - одна из немногих базовых операций в нём. это эзотерика.

[katremer]

Мне CakePHP всё время напоминает HT9+ - тоже язык, заточенный под задачу:

$this->C();
$this->R();
$this->U();
$this->D();

:)

[CPWIman]

И в чём понт?

[Jan_May]

Ты Кнута уже дочитал? Тогда попробуй повторить )

У меня, помнится, на С получился монстрег строк в 50, с кучей переподвыподвертов. Единственное, почему меня не покарал на месте дух Страуструпа - маленький ещё был. Но экспириенс получил незабываемый...

[micle]

Это порождение мега-мозга или машины? Просто возможно ли такое... Я в шоке :)

[katremer]

Есть такой язык Malbolge, так на нем первую программу смогли написать только через два года после появления языка. Говорят, лучший способ программить на нем - делать генератор случайных программ. Тем не менее, один мистик написал программу, которая выводит тест "99 бутылок" (99 bottles of beer on the wall...). Но никому не говорит, как.

[micle]

О Господи... А смысл? Головоломка на подобие Brainfuck'а?

[katremer]

Аха-ха. Кстати, с брейнфаком у меня лично не сложилось потому, что он был вещью в себе, с внешними устройствами и файлами не связывался, и писать что-либо было неинтересно :)

[micle]

А моя связь с ним окончилась по написании программы, выводящей числовую последовательность от 1 до 9 и обратно :)

[Pilot34]

а как выглядит пример такой программы на каком-нибудь вменяемом языке?

[karabatov]

на вменяемом такое писать, видимо, неинтересно — нет интриги :)

[mas]

Волшебное слово - Quine.

[Pilot34]

угу... спасиб

main(){char*s="#include %cmain(){char*s=%c%s%c;cout.form(s,10,34,s,34,10);}%c";cout.form(s,10,34,s,34,10);}

жесть..

[blv]

Haskell — язык достаточно вменяемый, а Python и Ruby — уже фактически мейнстрим.

[Karbas]

Хабраформатирование коментов мешает мне вставить непосредственно сюда эту красоту, так что - смотрите в первоисточник -
Spiraling Quine
Запускать обязательно!

[Tishka17]

не могу насладиться красотой картины. все просто просто мерцает. Где добыть медленный проц для тестов?

[Karbas]

Вопрос существенный, я попробую узнать =)

[deepone]

Молодца, оперативно узнал =)

[deepone]

Ну Если аккуратно добавить sleep(1) в код - то конечно замедлится, но потеряется спиральность.
Я придумал более странный способ:
/etc/rc.d/powerd stop
sysctl dev.cpu.0.freq=100
и компьютер превращается в калькулятор.