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

    +146

    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
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    (
     define
     (
      lazy-reader
      reader
     )
     (
      lambda
      (
       port
      )
      (
       make-lazy-list1
       (
        lambda
        (
        )
        
        (
         let
         (
          (
           it
           (
            reader
            port
           )
          )
         )
         (
          if
          (
           eof-object?
           it
          )
          '
          (
          )
          it
         )
        )
       )
      )
     )
    )

    Идиотское форматирование в Scheme

    Запостил: guest, 12 Июня 2009

    Комментарии (1) RSS

    Добавить комментарий