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

    +128

    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
    [Record] variant ItemPatternMatched: PatternMatchedBase, IPatternMatched
			_matchByLexemeValue:option[string]
			public Match(source:SourceLexemes, namedLinkDictionary:NamedLinkDictionary):MatchResult
				match(source)
					|[]               => MatchResult.EndOfLexemes(source, namedLinkDictionary)
					|lexeme_::lexemes_=>    def updatedNamedLinkDictionary = updateNamedLinkDictionary(lexeme_::[], namedLinkDictionary);
											def failure = MatchResult.Failure(source, namedLinkDictionary);
											def success = MatchResult.Success(lexemes_, updatedNamedLinkDictionary);
											match(_matchByLexemeValue)
												|None | Some(lexemeValue_) when (lexemeValue_==lexeme_._value) =>											
													match(this, lexeme_._type)
														|(Symbol, SourceLexeme.Type.Symbol) | (Identificator, SourceLexeme.Type.Identificator) | (Number, SourceLexeme.Type.Number) => 
															success
														|_                                                                                                                          => 
															failure
												|_                                                             => 
													failure
			|Symbol
			|Identificator
			|Number

    Начальник, посмотрев на код, сказал, что NemerleGovno. Я не знаю, что ему ответить?

    LispGovno, 30 Октября 2012

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

  2. Куча / Говнокод #12021

    +133

    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
    <script type="text/javascript" src="jquery.js"></script>
<script type="text/javascript">
$(document).ready(function() {		
	// ...skipped...
});  
</script>
<!-- end script vert menu -->

<!-- spoiler -->
<script src="http://ajax.googleapis.com/ajax/libs/jquery/1.3/jquery.min.js" type="text/javascript"> </script>
<script type="text/javascript"> 
$(document).ready(function(){ 
// ...skipped...
});
</script>
<!-- spoiler -->

<!-- up-->
<script language="JavaScript" type="text/javascript"
src="https://ajax.googleapis.com/ajax/libs/jquery/1.7.2/jquery.min.js">
</script><!--up-->
<script src='http://ajax.googleapis.com/ajax/libs/jquery/1.4.2/jquery.min.js' type='text/javascript'></script>
<script type="text/javascript" src="ajax.js"></script>
<!-- gallery -->  
<script src="https://ajax.googleapis.com/ajax/libs/jquery/1.6.1/jquery.min.js" type="text/javascript"></script>

    jQuery в организме не хватает?..

    telnet, 29 Октября 2012

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

  3. Куча / Говнокод #12007

    +104

    1. 1
    http://zapret-info.gov.ru/

    Ананимус ты не знаешь где посмотреть детское порно специально для тебя каталог со свежим проном.

    Vasiliy, 26 Октября 2012

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

  4. Куча / Говнокод #12004

    +142

    1. 1
    http://habrahabr.ru/post/155131/

    dos_, 25 Октября 2012

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

  5. Куча / Говнокод #12003

    +95

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    println    (13.0 to 14.0 by 0.1);
println    (1.3 to  1.4 by 0.01);
println    (7.0 to 8.2 by 0.3);

//Output:
NumericRange(13.0, 13.1, 13.2, 13.3, 13.4, 13.5, 13.6, 13.7, 13.8, 13.9, 14.0)
NumericRange(1.3, 1.31, 1.32, 1.33, 1.34, 1.35, 1.36, 1.37, 1.38, 1.39)
java.lang.ArithmeticException: Non-terminating decimal expansion; no exact representable decimal result.
	at java.math.BigDecimal.divide(BigDecimal.java:1616)

    Скала - говно. Вернее даже говнище. И это достойно отдельного поста.
    Консолька для запуска тут:
    http://www.simplyscala.com/

    3.14159265, 25 Октября 2012

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

  6. Куча / Говнокод #11993

    +129

    1. 1
    <input type="hidden" style="width:0px; height:0px;border:0px" name="eventtype" value="3" />

    shmaltorhbooks, 25 Октября 2012

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

  7. Куча / Говнокод #11991

    +140

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    говорят, что на PL/1 это работает:

if if = then then
    then = else;
else else = if;

    dim1r, 25 Октября 2012

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

  8. Куча / Говнокод #11979

    +175

    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
    with Ada.Integer_Text_Io, Ada.Text_Io;
use Ada.Integer_Text_Io, Ada.Text_Io;

procedure Test is
v : Long_Float := 26.0;
v1 : float := 26.0;
begin
   while (v<27.0) loop
         Put_Line("Value = " & Long_Float'image(v));
        v:=v+0.2;
   end loop;
   while (v1<27.0) loop
         Put_Line("Value = " & float'image(v1));
        v1:=v1+0.2;
   end loop;

end;

    ideone.com/pXIhvY
    Безопасный военный язык, да.

    3.14159265, 23 Октября 2012

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

  9. Куча / Говнокод #11978

    +132

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    main = do
        print [1 .. 9]
        print [1, 3 .. 9]
        print [1, 3 .. 10]
        print [26.0, 26.2 .. 27.0]
        print [25.5..30.0]
        print [25, 25 .. 25]

    В хаскеле сломан генератор списков. :(
    http://ideone.com/AvBSuz

    HaskellGovno, 22 Октября 2012

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

  10. Куча / Говнокод #11968

    +128

    1. 1
    f = expr `catches` [Handler (\ (ex :: ArithException) -> handleArith ex), Handler (\ (ex :: IOException)    -> handleIO    ex)]

    Собственно это пример как в хаскеле перехватывать исключения из одного выражения expr.
    Выглядит конечно отстойно. Очень многословно и судя по всему метода проще нет. И понятное дело, в чистых ленивых функциях это не работает. Ловить исключения можно только в грязных IO-функциях, тк сигнатура такова: catches :: IO a -> [Handler a] -> IO a

    HaskellGovno, 21 Октября 2012

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