1. Куча / Говнокод #11731

    +117

    1. 1
    main = print x where x = x + 0

    http://ideone.com/9caQE

    result: Runtime error     time: 0.01s    memory: 3536 kB     signal: -1 
    input: no
    output: no
    stderr:
    prog: <<loop>>

    LispGovno, 09 Сентября 2012

    Комментарии (8)
  2. Куча / Говнокод #11700

    +121

    1. 1
    2. 2
    3. 3
    4. 4
    ignore(MainForm.g.Items.Add
    			(
    				if(! $['A'..'Z'].Concat($['а'..'я']).Concat($['А'..'Я']).Concat($['a'..'z']).Contains(tok[0])) $"#$code" else tok
    			));

    LispGovno, 04 Сентября 2012

    Комментарии (35)
  3. Куча / Говнокод #11688

    +142

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    program maze;{МАЗЬ}
    
    ...
    
    REPEAT UNTIL KEYPRESSED;
    
    ...
    
    case {коза} с of:
    ...
    
    
    /* FILE NAME   : IMAGE.C
     * PURPOSE     : Fig it knows.
    ...
    */
    
      BYTE *buf = 0L;
      if (!(buf += malloc(WWW * HHH)))
      {
        printf(" У меня склероз ...\n Press Ctrl-Alt-Del.");
        return;
      }
    
    for(int C=0;C<n;/*Borland*/C++)
    ...

    Петросянство в школокоде :-\

    (+= - чтобы избавиться от варнинга.)

    Steve_Brown, 31 Августа 2012

    Комментарии (9)
  4. Куча / Говнокод #11679

    +131

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    if (http_status_code == 200 || http_status_code == 500) {
      .... //success!!
    } else {
      .... // error!!
    }

    Было замечено в одном андроид приложении.

    mr.The, 30 Августа 2012

    Комментарии (14)
  5. Куча / Говнокод #11666

    +129

    1. 1
    2. 2
    3. 3
    4. 4
    <li title="document.location='http://handleopenurl.com/scheme/buffer' null" href="http://handleopenurl.com/scheme/buffer" class="scheme" onclick="document.location='http://handleopenurl.com/scheme/buffer'">
    <h1>Buffer</h1>
    <h2 class="code">bufferapp</h2>
    </li>

    И это всё вместо <a>.

    Vindicar, 29 Августа 2012

    Комментарии (9)
  6. Куча / Говнокод #11658

    +121

    1. 1
    2. 2
    (set 'b (read))
    (eval b)

    http://ideone.com/3ImB9

    LispGovno, 28 Августа 2012

    Комментарии (92)
  7. Куча / Говнокод #11656

    +119

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    > Наша фирма разрабатывает серьезный софт на CL, Scheme и
    некоторых других языках. Но в последнее время в нашей продукции
    часто стали находить эксплоиты (что-бы не пугать наших клиентов -
    подробнее не скажу). Нам для LISP-подобных языков необходима
    DEP (Data Execution Prevention). Есть ли подобные наработки в этой области?
    Пока ничего побобного для языков этого семейства мы не находили и очень
    расстроены сложившимися обстоятельствами.

    Не мог ни запостить.

    HaskellGovno, 27 Августа 2012

    Комментарии (50)
  8. Куча / Говнокод #11633

    +115

    1. 1
    2. 2
    3. 3
    4. 4
    -- Настало время запостить самое главное гавно Хаскеля:
    -- http://www.johndcook.com/blog/2010/05/18/pure-functions-have-side-effects/
    -- У чистых функций всегда есть side-effects, которые выражаются в пожирании памяти и CPU. 
    -- Очевидно конечно, но почему об этом не орут на первой странице каждой книги по функциональному программированию?

    Я проверил, код компилируется:
    http://ideone.com/sozuV

    HaskellGovno, 23 Августа 2012

    Комментарии (12)
  9. Куча / Говнокод #11629

    +141

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    <select>
    	<option class="a2" value="0" selected="selected">любой возраст</option>
    	<option class="a2" value="1">0 мес - 6 мес</option>
    	<option class="a2" value="2">0 мес - 12 мес</option>
    </select>

    selected="selected" для элемента, выбираемого по дефолту - зачем?
    ps. Код - кусок статичного html.

    domaster, 22 Августа 2012

    Комментарии (10)
  10. Куча / Говнокод #11623

    +125

    1. 1
    sed -e 's/^/;;/g;s/$/ /g' -e :a -e '1!x;1h;s/.*\(.\)$/\1/;p;x;s/\(.*\).$/\1/;h;ta' ~/src/find_world.sh |  sed -e :a -e 'N;s/\n//g;ba' | sed -e 's/;;/\n/g' -e 's/^[ ]*//g'

    rev

    AliceGoth, 20 Августа 2012

    Комментарии (19)