1. Си / Говнокод #26848

    0

    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
    81. 81
    82. 82
    83. 83
    84. 84
    85. 85
    86. 86
    87. 87
    88. 88
    89. 89
    90. 90
    91. 91
    92. 92
    93. 93
    94. 94
    95. 95
    #include <stdio.h>
#include <stddef.h>
#include <stdlib.h>
#include <stdint.h>

#define GEN_NAME(type) struct myvec_ ## type

#define MK_VEC_TYPE(type) GEN_NAME(type) {size_t sz; type arr[];}; 

#define MK_VEC_NEW(type) \
GEN_NAME(type) *myvec_new_ ## type (size_t num) \
{ \
  struct myvec_ ## type *tmp = malloc(sizeof(type) * num); \
  if (tmp == NULL) \
  { \
    return NULL; \
  } \
  tmp->sz = num; \
  return tmp; \
}

#define MK_VEC_DELETE(type) \
void myvec_delete_ ## type (GEN_NAME(type) *v) \
{ \
  free(v); \
}


#define MK_VEC_GET(type) \
type myvec_get_ ## type (GEN_NAME(type) *v, size_t pos) \
{ \
  if(pos < v->sz) \
  { \
    return v->arr[pos]; \
  } \
  else \
  { \
    exit(-1); \
  } \
}
// исключения - говно

#define MK_VEC_SET(type) \
void myvec_set_ ## type (GEN_NAME(type) *v, size_t pos, type val) \
{ \
  if(pos < v->sz) \
  { \
    v->arr[pos] = val; \
  } \
  else \
  { \
    exit(-1); \
  } \
}


#define MK_VEC_GETSZ(type) \
size_t myvec_getsz_ ## type (GEN_NAME(type) v) \
{ \
  return v.sz; \
}

#define MK_SHIT(type) \
MK_VEC_TYPE(type) \
MK_VEC_NEW(type) \
MK_VEC_DELETE(type) \
MK_VEC_GET(type) \
MK_VEC_GETSZ(type) \
MK_VEC_SET(type)

MK_SHIT(int)
MK_SHIT(float)
MK_SHIT(double)

#define test(a) _Generic(a, int : 1, GEN_NAME(int) : 2, default : 0)

#define MTD_C(val,mtd) _Generic( val,\
  GEN_NAME(int): myvec_ ## mtd ##_int, \
  GEN_NAME(float): myvec_ ## mtd ##_float, \
  GEN_NAME(double): myvec_ ## mtd ##_double, \
  default: 0) // хуй там!

#define GET(vec,pos) MTD_C(vec,get)(&vec,pos)
#define SET(vec, pos, val) MTD_C(vec,set)(&vec,pos,val)
#define GETSZ(vec) MTD_C(vec,getsz)(vec)
  
int main(void)
{
  GEN_NAME(int) *vec1 = myvec_new_int(10);
  SET(*vec1, 0, 123);
  size_t size = GETSZ(*vec1);
  printf("vector size is %zu\n", size);
  printf("vector vec1[0] is %d\n", GET(*vec1,0));
  return 0;
}

    Какое ООП)))

    Запостил: j123123, 07 Августа 2020

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

    • ava j123123 07.08.2020 10:29 # 0

      Можно эту хуйню конечно расширить, но я уже заебался

      Кстати тут есть баг в одном месте, кто найдет - тому нихуя
      Ответить

      • ava j123123 03.09.2020 05:49 # 0

        Раз никто так нихуя не нашел баг, сообщаю:
        13|  struct myvec_ ## type *tmp = malloc(sizeof(type) * num); \

        Надо вот так:
        13|  struct myvec_ ## type *tmp = malloc(sizeof(size_t) + sizeof(type) * num); \


        Ну это еще при условии, что у size_t размер такой, что адрес первого элемента хуйни "type arr[];" будет сразу же после этого size_t (это надо требованиям для выравнивания того типа смотреть), так что тут эту поебень может быть нужно будет даже как-нибудь усложнить
        Ответить

    • ava bormand 07.08.2020 10:34 # 0

      Какое метапрограммирование )))
      Ответить

    • ava OCETuHCKuu_nemyx 07.08.2020 22:03 # 0

      Переведи на «PHP».
      Ответить

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