По колено в коде — Говнокод.ру

Си / Говнокод #29146

0

01
02
03
04
05
06
07
08
09
10
11
12
13

#include <stdio.h>

struct{int a; float b;} test()
{
  return (typeof(test())){1337, 666.666};
}

int main()
{
  auto a = test();
  printf("%d %f\n", a.a, a.b);
  return 0;
}

В стандарт C23 добавили auto и теперь можно писать такую хуйню. В "Clang" работает: https://godbolt.org/z/GG3addqPb

j123123, 17 Июня 2025

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

Куча / Говнокод #29144

0

1
2
3

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

BelCodeMonkey, 09 Июня 2025

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

Haskell / Говнокод #29143

0

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

(defparameter *workers* 200)

(defun rn-virt-dfns (data &optional (turn-on t))
  (defconstant +workers+ *workers*)
  `(declare (type (array (member ,(let* ((i '())) (do* ((y 0 (+ y 1))) ((= y 9) 'nil) (push y i)))) (3)) data))
  (sb-alien:define-alien-type address-pointer (sb-alien:system-area-pointer))
  (progn (macrolet ((>> (x s) `,(ash x s)) (<< (x -s) `(ash ,x ,(- -s))) (~ (x) `(lognot ,x)) (& (x) `(sb-kernel:get-lisp-obj-address ,x)))
    (let ((truedata (eval `(mapcar #'(lambda (x) (coerce x 'list)) (coerce ,data 'list)))))
      (labels ((get-pointer (addr)
                 (sb-sys:sap-ref-8 (sb-sys:int-sap addr) 0))
               (proc-dfns-simd (pntrx mmr pntry orgdt)
                 (declare (type integer pntrx pntry)
                          (type (array integer (*)))
                          (type list orgdt))
                 (loop for it in `(,@orgdt)
                       do (let ((dif (the integer (- pntry `,(& it)))))
                            (when (= `,(abs dif) (+ #XA #X1))
                              (do ((it 0 (+ it (if `(plusp ,dif) 1 -1)))) ((= it (if `(plusp ,dif) 16 -16)) nil)
                                (ignore-errors
                                  (let ((lazy `(setf (& (get-pointer (- ,dif ,it))) #b0))
                                        (lazy-2 `(setf (~ (& (get-pointer (- ,dif ,it))) #b1))))
                                    (when turn-on (eval lazy) (eval lazy-2))))))
                            (when (/= (abs dif) 8)
                              (if `(plusp ,dif)
                                (dotimes (i 8)
                                  (ignore-errors
                                    (let ((lazy `(setf (>> (& (get-pointer (- ,dif ,i))) #x1) #b1)))
                                      (when turn-on (eval lazy)))))
                                (loop for i from 0 downto -8 by 1
                                      do (ignore-errors
                                           (let ((lazy `(setf (<< (& (get-pointer (- ,dif ,i))) #x1) #b1)))
                                              (when turn-on (eval lazy)))))))))))

        (handler-case
            (loop repeat +workers+ do (bt:make-thread #'(lambda () (proc-dfns-simd `,(& data) `,data `,(& truedata) `,truedata))))
          (error (e)
            (declare (ignore e)))))))))


(rn-virt-dfns #(#(1) #(2)))

lisp-worst-code, 08 Июня 2025

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

Куча / Говнокод #29142

0

1

Пиздец-оффтоп #111

#81: https://govnokod.ru/28750 https://govnokod.xyz/_28750
#82: https://govnokod.ru/28779 https://govnokod.xyz/_28779
#83: https://govnokod.ru/28788 https://govnokod.xyz/_28788
#84: https://govnokod.ru/28795 https://govnokod.xyz/_28795
#85: https://govnokod.ru/28808 https://govnokod.xyz/_28808
#86: (vanished) https://govnokod.xyz/_28814
#87: https://govnokod.ru/28817 https://govnokod.xyz/_28817
#88: https://govnokod.ru/28836 https://govnokod.xyz/_28836
#89: https://govnokod.ru/28843 https://govnokod.xyz/_28843
#90: https://govnokod.ru/28874 https://govnokod.xyz/_28874
#91: https://govnokod.ru/28880 https://govnokod.xyz/_28880
#92: https://govnokod.ru/28884 https://govnokod.xyz/_28884
#93: https://govnokod.ru/28889 https://govnokod.xyz/_28889
#94: https://govnokod.ru/28895 https://govnokod.xyz/_28895
#95: https://govnokod.ru/28904 https://govnokod.xyz/_28904
#96: https://govnokod.ru/28912 https://govnokod.xyz/_28912
#97: https://govnokod.ru/28918 https://govnokod.xyz/_28918
#98: https://govnokod.ru/28932 https://govnokod.xyz/_28932
#99: https://govnokod.ru/28936 https://govnokod.xyz/_28936
#100: https://govnokod.ru/28940 https://govnokod.xyz/_28940
#101: https://govnokod.ru/28949 https://govnokod.xyz/_28949
#102: https://govnokod.ru/28978 https://govnokod.xyz/_28978
#103: https://govnokod.ru/28982 https://govnokod.xyz/_28982
#104: https://govnokod.ru/28989 https://govnokod.xyz/_28989
#105: https://govnokod.ru/29052 https://govnokod.xyz/_29052
#106: https://govnokod.ru/29069 https://govnokod.xyz/_29069
#107: https://govnokod.ru/29086 https://govnokod.xyz/_29086
#108: https://govnokod.ru/29102 https://govnokod.xyz/_29102
#109: https://govnokod.ru/29126 https://govnokod.xyz/_29126
#110: https://govnokod.ru/29136 https://govnokod.xyz/_29136

nepeKamHblu_nemyx, 08 Июня 2025

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

Haskell / Говнокод #29141

0

1
2
3
4
5
6
7
8

(defun functional-function (x)
  (setf *random-state* (make-random-state t))
  (defconstant xx (setq e (+ x 44)))
  (if (= (length lst) 1)
    (return-from functional-function (make-list))
    (if (> (car lst) (cadr lst))
      (return-from functional-function (cons lst (apply #'functional-function (setf (or (car (cdr lst)) (cadr lst)) (cadr lst)))))
      (return-from functional-function (cons lst (apply #'functional-function (setf (or (car (cdr lst)) (cadr lst)) (car lst))))))))

lisp-worst-code, 08 Июня 2025

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

Куча / Говнокод #29140

0

1

Бесконечный оффтоп имени Гологуба #6

#1: https://govnokod.ru/28992 https://govnokod.xyz/_28992
#2: https://govnokod.ru/29053 https://govnokod.xyz/_29053
#3: https://govnokod.ru/29075 https://govnokod.xyz/_29075
#4: https://govnokod.ru/29110 https://govnokod.xyz/_29110
#5: https://govnokod.ru/29127 https://govnokod.xyz/_29127

nepeKamHblu_nemyx, 03 Июня 2025

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

Куча / Говнокод #29139

0

1
2
3
4
5

...В детстве я любил русские народные сказки из сборника Афанасьева.
Сюжет даже откровенно взрослых сказок он передавал мягко, избегая зауми; с грубоватым, народным юмором, слегка подпёздывая, а затем плавно 
и в подробностях подходя к кульминации.

После того, как я уже в зрелом возрасте прочел, как барыня заставила холопа нюхать свою пизду, я стал практиковать воздержание.

Ну его нахуй, сказка ведь может и былью статься.
Нужно срочно запретить сказки! Тем более, что все перечисленные в них извращения успешно практикуют и те дети, кому и сказок-то не читали.

3uMuCTOH, 28 Мая 2025

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

Куча / Говнокод #29138

0

1
2
3
4

Афоризм "Отцы были хуже дедов, а мы и вовсе никчемны" - обрел свой истинный, ужасный смысл. 
Словно предвосхищая трескотню быдла, которое будет жалеть расстрелянных ЧК царят,  Юровский оставил примерно такие строки:
... Вероятно, новое поколение увидит в нас палачей и не поймет сразу, почему мы в ту ночь не пощадили царских отпрысков. 
Перед тем, как судить, задайте себе вопрос: в кого бы выросли, кем бы стали эти дети?..

Быдла остается катастрофически много, несмотря даже на принятые Хуйлом меры. И оно интенсивно плодит такое же быдло.
Нужно срочно развязать новую войну - с Грузией.

doomginho, 25 Мая 2025

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

Куча / Говнокод #29137

0

1

Россия погрязла в мусоре и крысятах.

Тех, кто учит убивать крыс, недалек. Мы прибираем за людьми, но этого не ценят.
Всевышний сделал нас плодовитыми, чтобы не дай Бог, глупые люди не истребили нас - ибо голубой шарик сильно развоняется под миллионами тонн гниющей органики, которую некому будет перерабатывать.

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

KPblCA, 21 Мая 2025