- 1
f = expr `catches` [Handler (\ (ex :: ArithException) -> handleArith ex), Handler (\ (ex :: IOException) -> handleIO ex)]
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+128
f = expr `catches` [Handler (\ (ex :: ArithException) -> handleArith ex), Handler (\ (ex :: IOException) -> handleIO ex)]
Собственно это пример как в хаскеле перехватывать исключения из одного выражения expr.
Выглядит конечно отстойно. Очень многословно и судя по всему метода проще нет. И понятное дело, в чистых ленивых функциях это не работает. Ловить исключения можно только в грязных IO-функциях, тк сигнатура такова: catches :: IO a -> [Handler a] -> IO a
+123
(format t "~{~[~:R~; ~S~:;none~] chance~^, ~}" '(0 1 0 2 0 3))
;; first chance, second chance, third chance
Любителям ДСЛ (а так же древесно-стружечных плит, и других керамических изделий):
Объясните почему так работает? Наверное не говнокод, просто нихрена не понятно.
+127
<COUNTRY>Испания</COUNTRY>
<REGION><![CDATA[Краснодарский Край]]></REGION>
"Максим не знал, смеяться или плакать, Максим не знал, зачем учился в школе..."(с)
xml-выгрузка данных с одного сайта агентства недвижимости.
+129
arr <- return $ map (2*) lst
Я тут читал раздел на одном форуме по решению задач для школьников и наткнулся на такое говно.
- let?
- Не, не слышал.
Подозреваю, что автор не понял, что let нужно писать без in в монадах, чтобы скомпилировалось.
+126
PHP (66%, 152 голосов)
C++ (8%, 18 голосов)
Java (5%, 12 голосов)
Delphi (5%, 11 голосов)
Ни одного не знаю ( (4%, 10 голосов)
C# (4%, 9 голосов)
JavaScript (3%, 8 голосов)
Ни одного не знаю (2%, 5 голосов)
C (1%, 3 голосов)
Perl (0%, 1 голосов)
Ассемблер (0%, 1 голосов)
Python (0%, 0 голосов)
Ruby (2%, 0 голосов)
Всего голосов: 230
Нормальная такая статистика. Прогеры явно подигрывают ruby
+123
fixed login dabl validation;
dabl ajax zaproses;
комментарий к коммиту
+130
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8">
<title>Centering div content in 2012 using CSS</title>
<meta name="viewport" content="width=device-width, initial-scale=1, maximum-scale=1">
<style>
/* align horizontally */
.fu { width: 100%; text-align: center; }
/* align vertically */
@media all and (min-height:0px) { .fu { margin-top: 0px; }}
@media all and (min-height:2px) { .fu { margin-top: 1px; }}
@media all and (min-height:4px) { .fu { margin-top: 2px; }}
@media all and (min-height:6px) { .fu { margin-top: 3px; }}
@media all and (min-height:8px) { .fu { margin-top: 4px; }}
@media all and (min-height:10px) { .fu { margin-top: 5px; }}
@media all and (min-height:12px) { .fu { margin-top: 6px; }}
@media all and (min-height:14px) { .fu { margin-top: 7px; }}
@media all and (min-height:16px) { .fu { margin-top: 8px; }}
@media all and (min-height:18px) { .fu { margin-top: 9px; }}
@media all and (min-height:20px) { .fu { margin-top: 10px; }}
@media all and (min-height:22px) { .fu { margin-top: 11px; }}
.....
.....
.....
@media all and (min-height:1994px) { .fu { margin-top: 997px; }}
@media all and (min-height:1996px) { .fu { margin-top: 998px; }}
@media all and (min-height:1998px) { .fu { margin-top: 999px; }}
</style>
</head>
<body>
<div class="fu">horizontally and vertically centered</div>
</body>
</html>
Центрируем содержимое дива по горизонтали и вертикали :) http://jsfiddle.net/ykrBh/
+134
.events-bx-calendar .calendar-wrapper .calendar .days #day_1,
.events-bx-calendar .calendar-wrapper .calendar .days #day_2,
.events-bx-calendar .calendar-wrapper .calendar .days #day_3,
.events-bx-calendar .calendar-wrapper .calendar .days #day_4,
.events-bx-calendar .calendar-wrapper .calendar .days #day_5,
.events-bx-calendar .calendar-wrapper .calendar .days #day_6,
.events-bx-calendar .calendar-wrapper .calendar .days #day_7,
.events-bx-calendar .calendar-wrapper .calendar .days #day_8,
.events-bx-calendar .calendar-wrapper .calendar .days #day_9,
.events-bx-calendar .calendar-wrapper .calendar .days #day_10,
.events-bx-calendar .calendar-wrapper .calendar .days #day_11,
.events-bx-calendar .calendar-wrapper .calendar .days #day_12,
.events-bx-calendar .calendar-wrapper .calendar .days #day_13,
.events-bx-calendar .calendar-wrapper .calendar .days #day_14,
.events-bx-calendar .calendar-wrapper .calendar .days #day_15,
.events-bx-calendar .calendar-wrapper .calendar .days #day_16,
.events-bx-calendar .calendar-wrapper .calendar .days #day_17,
.events-bx-calendar .calendar-wrapper .calendar .days #day_18,
.events-bx-calendar .calendar-wrapper .calendar .days #day_19,
.events-bx-calendar .calendar-wrapper .calendar .days #day_20,
.events-bx-calendar .calendar-wrapper .calendar .days #day_21,
.events-bx-calendar .calendar-wrapper .calendar .days #day_22,
.events-bx-calendar .calendar-wrapper .calendar .days #day_23,
.events-bx-calendar .calendar-wrapper .calendar .days #day_24,
.events-bx-calendar .calendar-wrapper .calendar .days #day_25,
.events-bx-calendar .calendar-wrapper .calendar .days #day_26,
.events-bx-calendar .calendar-wrapper .calendar .days #day_27,
.events-bx-calendar .calendar-wrapper .calendar .days #day_28,
.events-bx-calendar .calendar-wrapper .calendar .days #day_29,
.events-bx-calendar .calendar-wrapper .calendar .days #day_30,
.events-bx-calendar .calendar-wrapper .calendar .days #day_31 { padding: 5px 3px; }
+139
// Эволюция программы
foo = true;
function foo(){
return true;
}
function foo( param ){
return int;
}
function foo( param1, param2, param3, param4, param5 ){
return result;
}
function foo( object ){
return {result1, result2};
}
class foo {
function bar( object1 ){
return result1;
}
function biz( object2 ){
return result2;
}
}
class factory {
foo = new foo();
bar = new bar();
}
server1 = new factory1();
server2 = new factory2();
// прошло миллион лет...
...а потом программа встала и пошла.
просто так
+138
# it makes sense to use it only for
# numbers up to 100
fun StringToInteger (str) {
int = -1;
for (i=0; i<=100; i++) {
if (i+"" == str) {
int = i;
break;
}
}
return int;
}
Функция преобразования строк в целые числа из кода бутскрина Ubuntu на неизвестном науке кастомном скриптовом языке.
Пруфлинк: http://bazaar.launchpad.net/~ubuntu-branches/ubuntu/precise/plymouth/precise/view/head:/themes/ubuntu-logo/ubuntu-logo.script#L149