+125
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
# /* [ <!-- */ include <stdio.h> /* \
#{\
`""""true \\#{"\n#"}; \
\
if [ -n "$ZSH_VERSION" ]; then \
\
echo exec echo I\'m a zsh script.; \
\
elif [ -n "$BASH_VERSION" ]; then \
\
echo exec echo I\'m a bash script.; \
else \
echo exec echo I\'m a sh script.; \
fi`; #\
BEGIN{print"I'm a ", 0 ? "Ruby" :"Perl", " program.\n"; exit; }
#\
%q~
set dummy =0; puts [list "I'm" "a" "tcl" "script."]; exit
all: ; @echo "I'm a Makefile." \
#*/
/*: */ enum {a, b}; \
\
static int c99(void) {
#ifndef __cplusplus /* bah */
unused1: if ((enum {b, a})0) \
(void)0;
#endif
unused2: return a; \
} \
static int trigraphs(void) { \
\
return sizeof "??!" == 2; \
} \
char X; \
\
int main(void) { \
\
struct X { \
\
char a[2]; \
};\
if (sizeof(X) != 1) { \
\
printf("I'm a C++ program (trigraphs %sabled).\n", \
\
trigraphs() ? "en" : "dis");\
\
}else if (1//**/2
)unused3 : { ; \
printf("I'm a C program (C%s, trigraphs %sabled).\n", \
c99() ? "89 with // comments" : "99", \
trigraphs() ? "en" : "dis"); \
} else { \
printf("I'm a C program (C89, trigraphs %sabled).\n", \
trigraphs() ? "en" : "dis"); \
} \
return 0; \
} /*
# \
> main :: IO () -- -- \
> main = putStr "I'm a Literate Haskell program.\n"
# \
]>++++++++[<+++++++++>-]<+.>>++++[<++++++++++>-]<-.[-]>++++++++++ \
[<+++++++++++>-]<-.>>++++[<++++++++>-]<.>>++++++++++[<++++++++++> \
-]<- - -.<.>+.->>++++++++++[<+++++++++++>-]<++++.<.>>>++++++++++[ \
<++++++++++>-]<+++++.<<<<+.->>>>- - -.<+++.- - -<++.- ->>>>>+++++ \
+++++[<+++++++++++>-]<- - -.<<<<<.<+++.>>>.<<<-.- ->>>>+.<.<.<<.> \
++++++++++++++.[-]++++++++++"""`
# \
print "I'm a Python program."; """[-][--><html><head>
<!--:--><title>I'm a HTML page</title></head><body>
<!--:--><h1>I'm a <marquee><blink>horrible HTML</blink></marquee> page</h1>
<!--:--><script language="Javascript">
<!--: # \
setTimeout( // \
function () { // \
document.body.innerHTML = "<h1>I'm a javascript-generated HTML page</h1>"; // \
}, 10000); // \
//-->
</script><!--: \
</body></html><!-- } # \
say "I'm a Perl6 program", try { " ($?PUGS_VERSION)" } // "", "."; # """ # */
#define FOO ]-->~
Программа-полиморф hello world на 15 языках. Работает в C, C++, Haskell, Ruby, Python, Perl(x2), HTML, tcl, bash, zsh, make, bash и brainfuck.
Запостил: guest,
16 Июня 2009
guest 16.06.2009 06:36 # 0
О_о
guest 16.06.2009 08:38 # +4
ОНО РАБОТАЕТ!!!
guest 16.06.2009 10:04 # +2
еще как работает
guest 16.06.2009 10:54 # 0
guest 16.06.2009 21:01 # +2
баяяя! спизженно с хабра!
guest 16.06.2009 21:49 # +2
#5 зачем на космическом телескопе этот код?..
guest 25.06.2009 05:42 # −1
ололо! это не говно, это извращение))
guest 25.06.2009 06:46 # +2
олол! на хабре тоже не первоисточник
guest 27.06.2009 03:21 # 0
good+
интересно, кто знает хоть один компилятор, который по этому "тесту" C99?[;-)]
gost 21.08.2014 14:03 # 0
Компилятор для C99, не?
guest 27.06.2009 23:31 # 0
едитская сила!!!!!!!!!!!!!!!!!! CodeBloks толь раз предупреждение выдал!!!!!!!!!!!!!!!!!!!!
guest 29.06.2009 13:44 # 0
g++ выдал ошибку
guest 11.08.2009 10:09 # 0
А код действительно офигеть о_0 проверил на питоне и С++ - работает. Это ж надо было такое написать ._.
guest 11.08.2009 11:55 # 0
Загружаю в себе в телефон (у меня там питон стоит) и тестим! :)
Oleg_quadro 12.08.2009 17:27 # 0
guest 13.08.2009 10:31 # 0
guest 02.12.2009 13:33 # 0
Говногость 31.08.2009 17:32 # +3
guest 25.02.2010 16:15 # +1
грех не плюсануть
AdOLF_04 27.07.2010 18:00 # +1
Нужно поддержать еще Делфи, Лисп, Бейсик, а заодно и Форт, а также зафиксить баг для версии питона 3 и Хаскелл - не пашет. :). А все остальное вроде работает!
TheHamstertamer 20.03.2011 16:59 # −2
guest 05.04.2011 17:29 # 0
Actine 14.04.2011 22:59 # +2
http://ru.wikipedia.org/wiki/Whitespace
guest 24.09.2011 17:58 # +1
CPPGovno 25.09.2011 01:22 # +1
cpZFbWH 25.08.2021 02:56 # 0