1. Список говнокодов пользователя LispGovno

    Всего: 223

  2. C++ / Говнокод #15478

    +15

    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
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    #include <iostream>
#include <string>
#include <vector>
#include <list>
#include <algorithm>
#include <iterator>
#include <sstream>
#include <assert.h>
using namespace std;
template<class Container, class Iterator> 
size_t position(Container&& c, Iterator pos){
    return size_t(distance(begin(c), pos));
}
template<class Container, class Iterator, class Iterator2> 
string sposition(Container&& c, const pair<Iterator, Iterator2>& pos){
    ostringstream r;
    r << "(" << position(c, pos.first) << ", " << position(c, pos.second) << ")";
    return r.str();
}
template<class Container, class Value> 
pair<typename remove_reference<Container>::type::iterator, typename remove_reference<Container>::type::iterator>
 binary_search(Container&& source, const Value& item){
    assert(is_sorted(begin(source), end(source)));
    const auto empty = make_pair(source.end(), source.end());
    auto l = begin(source), r=end(source), m=l;
    while(true){
        if(l==r)
            return empty;
        const auto lr = distance(l,r);
        m = next(l, lr/2);
        if(*m<item)
            l = m;
        if(*m>item)
            r = m;
        if(*m==item)
            break;
        if(l!=r && next(l)==r)
            return empty;
    }
    cout<<"part1"<<endl;
    auto l1=l, r1=m, l2=m, r2=r;
    while(true){
        const auto lr1 = distance(l1, r1);
        m = next(l1, lr1/2);
        if(*m<item)
            l1 = m;
        if(*m>=item)
            r1 = m;
        if(l1==r1 || (*l1<item && *r1>=item))
            break;
    }
    cout<<"part2"<<endl;
    while(true){
        const auto lr2 = distance(l2, r2);
        m = next(l2, lr2/2);
        if(*m<=item)
            l2 = m;
        if(*m>item)
            r2 = m;
        if(l2==r2 || (*l2>=item && (r==r2 || *r2>item)))
            break;
    }
    cout<<"part3"<<endl;
    return {r1, next(l2)};
}
int main(){
    vector<int> s{5,7,7,7,9,19,23};
    list<int> s2(s.begin()+1, s.end());
    cout<<sposition(s, binary_search(s, 7))<<endl;
    cout<<sposition(s2, binary_search(s2, 7))<<endl;
    cout<<sposition(s, binary_search(s, 9))<<endl;
    cout<<sposition(s, binary_search(s, 5))<<endl;
    cout<<sposition(s, binary_search(s, 23))<<endl;
    cout<<sposition(s, binary_search(s, 0))<<endl;
    vector<int> e;
    cout<<sposition(e, binary_search(e, 0))<<endl;
    cout<<sposition(s, binary_search(s, 25))<<endl;
    cout<<sposition(s, binary_search(s, 10))<<endl;
    return 0;
}

    http://coliru.stacked-crooked.com/a/0f74a4661c06cd68
    Специально для @Пи, раз ему хачкель не нравится.

    LispGovno, 14 Марта 2014

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

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

    +126

    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
    import Data.Array
import Control.Arrow
l = [1,5,5,5,8,10,17]
make_array [] = undefined
make_array l = listArray (0, (length l)-1) l
-- binary_search:: (Integral i, Num i, Ord e, Ix i) => e -> Array i e -> i
binary_search item arr = bs la ra where
	(la, ra) = bounds arr
	nextWhileEqualItem = uncurry iterate >>> takeWhile (\i -> la<=i && i<=ra && arr!i==item) >>> last
	bs l r
		| (m == l || m == r) && item/=av = Nothing
		| item<av = bs l m
		| item>av = bs m r
		| item==av = Just (nextWhileEqualItem ((+) (-1), m), nextWhileEqualItem ((+)1, m))
		| otherwise = Nothing
		where
			m = (l+r) `div` 2
			av = arr!m
main = do
	print $ binary_search 8 $ make_array l
	print $ binary_search 5 $ make_array l
	print $ binary_search 5 $ make_array $ tail l
	print $ binary_search 0 $ make_array l
	print $ binary_search 100 $ make_array l
	print $ binary_search 9 $ make_array l

    Решил я значит поучаствовать в специальной олимпиаде Романа с двача.
    http://ideone.com/K5Jj59

    LispGovno, 14 Марта 2014

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

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

    +122

    1. 1
    2. 2
    substractOneFromArgument = (-)1
main = print $ substractOneFromArgument 4

    ПИШУ ФУНКЦИЮ ВЫЧИТАЮЩУЮ ЕДИНИЦУ ИЗ СВОЕГО АРГУМЕНТА
    @
    ПОЛУЧАЮ УПОРОТЫЙ РЕЗУЛЬТАТ
    http://ideone.com/I34iLA

    LispGovno, 14 Марта 2014

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

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

    +130

    1. 1
    DECLARE (A, B INIT ((5)0,(5)1)) DIM (0:9) FLOAT;

    LispGovno, 08 Марта 2014

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

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

    +127

    1. 1
    unfoldr (\b -> fmap (const . (second $ drop 1) . break (==' ') $ b) . listToMaybe $ b)

    LispGovno, 07 Марта 2014

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

  7. Си / Говнокод #15200

    +117

    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
    int mainCRTStartup()
{
  int argc = 0;
  char* argv[MAX_CMD_ARGS + 1];
  char** pargv = argv;
  char* cmdLine = strdup(GetCommandLineA());
  int result = 0;

  g_module = GetModuleHandle(NULL);
  g_process = GetCurrentProcess();
  g_thread = GetCurrentThread();
  g_heap = GetProcessHeap();

  for (*pargv = strtok(cmdLine, " "); *pargv && argc < MAX_CMD_ARGS; *pargv = strtok(NULL, " "))
  {
    ++argc;
    ++pargv;
  }

  *pargv = NULL;
  result = main(argc, argv);
  free(cmdLine);
  return result;
}

    LispGovno, 27 Февраля 2014

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

  8. C++ / Говнокод #14802

    +50

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    CleverPtr(const int other) 
  {
    this->~CleverPtr();
    new(this) CleverPtr();
    //operator =(other); 
  }

    Решение крестопроблем в крестостиле гейдевщиков:
    http://ideone.com/wIPzzc

    LispGovno, 22 Февраля 2014

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

  9. C++ / Говнокод #14778

    +57

    1. 1
    for(int loshdka_skachi = 0; loshadka_skachi < pyati_raz; loshadka_skachi += prig_skok){

    оттуда
    конардо посвящается

    LispGovno, 21 Февраля 2014

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

  10. C++ / Говнокод #14771

    +46

    1. 1
    2. 2
    3. 3
    4. 4
    vector<int> v = {1, 4, 6};
cout << "(";
copy(v.begin(), v.end(), ostream_iterator<int>(cout, ", "));
cout << ")";

    http://ideone.com/2j2jQG

    LispGovno, 21 Февраля 2014

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

  11. C++ / Говнокод #14719

    +132

    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
    template <typename T>class CleverPtr
{
  T* ptr;
public:
  ~CleverPtr () { delete ptr; }

  CleverPtr () : ptr(new T) {}

 CleverPtr(const CleverPtr& other) 
    :ptr(new T)    // <--- если напрягает, используйте делегирующий конструктор с++11
  {
    operator =(other); 
  }

  CleverPtr& operator = (const CleverPtr& other) 
  {
    if (this != &other)
       *ptr = *other.ptr;
     return *this;
  }
 
};

    оттуда

    LispGovno, 20 Февраля 2014

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