- 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
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
- 95
- 96
- 97
- 98
- 99
//macrolib.h
#ifndef MACRO_LIB
#define MACRO_LIB
#include <stdio.h>
typedef void proc(void);
#ifdef DEBUG
#define TRACE printf
#else
#define TRACE(...)
#endif
#ifdef TRACE_CALLS
#define ON_ENTER_TRACE(name) char __CUR_FUNC_NAME__[] = #name; TRACE("<entering %s>", __CUR_FUNC_NAME__);
#define ON_EXIT_TRACE(...) TRACE(__VA_ARGS__)
#else
#define ON_ENTER_TRACE(name) ;
#define ON_EXIT_TRACE(...)
#endif
#define def(type, name, ...) type name __VA_ARGS__ { ON_ENTER_TRACE(name)
#define ret(ret_val) {ON_EXIT_TRACE("<leaving %s>", __CUR_FUNC_NAME__); return ret_val;}
#define end(ret_val) ret(ret_val);}
#define with(type, x, on_exit) { type __CUR_WITH_VAR__ = x; int (*__ON_EXIT__)() = (int(*)())on_exit;
#define endwith __ON_EXIT__(__CUR_WITH_VAR__);}
#define dup(d, ...) __VA_ARGS__ d __VA_ARGS__
#define dupwithcomma(...) __VA_ARGS__, __VA_ARGS__
#endif
//chain.h
#ifdef I0
#undef I0
#if defined(I1) || defined(I2) || defined(I3)
ELEMENT DELIMETER
#include "chain.h"
#else
ELEMENT
#undef ELEMENT
#undef DELIMETER
#endif
#else
#ifdef I1
#undef I1
#define I0
ELEMENT DELIMETER
#include "chain.h"
#else
#ifdef I2
#undef I2
#define I1
#define I0
ELEMENT DELIMETER
#include "chain.h"
#else
#ifdef I3
#undef I3
#define I2
#define I1
#define I0
ELEMENT DELIMETER
#include "chain.h"
#endif
#endif
#endif
#endif
//test.c
#define DEBUG
#define TRACE_CALLS
#include "macrolib.h"
def(int, main, ())
printf(dup(" ", "%s"), dupwithcomma("Чот мне понравилось макроёбить..."));
FILE *f = fopen("file", "w");
with(FILE*, f, fclose)
fputs(
#define ELEMENT "o"
#define DELIMETER "l"
#define I3
#define I2
#define I1
#define I0
#include "chain.h"
, f
);
endwith
end(0)
Мне понравилось. то ещё можно намакроёбить? ;D
adrnin 30.10.2018 07:38 # 0
bormand 30.10.2018 07:53 # −1
j123123 30.10.2018 19:24 # 0
adrnin 30.10.2018 19:45 # 0
Я оч долго мучилсо, пока до этого дошол, я думал сперва просто числами считать, но нихуя не вышло, потом конкотенировал идентификаторы, типа: но тож, чот не фурычит :(
adrnin 02.11.2018 05:18 # 0
guest8 02.11.2018 14:46 # −999
adrnin 02.11.2018 16:21 # 0
bormand 30.10.2018 22:17 # 0
Elvenfighter 30.10.2018 22:35 # 0
Elvenfighter 30.10.2018 22:40 # 0
https://wandbox.org/permlink/q5nLUC1Gerl8rQH5
Elvenfighter 30.10.2018 22:41 # 0
guest8 30.10.2018 22:58 # −999
BUTTHURT 31.10.2018 00:13 # −102
guest8 31.10.2018 00:15 # −999
guest8 30.10.2018 23:22 # −999
adrnin 31.10.2018 04:17 # 0
adrnin 31.10.2018 14:05 # 0
Elvenfighter 31.10.2018 15:12 # 0
guest8 30.10.2018 22:56 # −999
KitKat 30.10.2018 23:15 # −1
guest8 30.10.2018 23:22 # −999
KitKat 30.10.2018 23:28 # −1
guest8 30.10.2018 23:27 # −999
KitKat 30.10.2018 23:28 # −1
adrnin 02.11.2018 05:20 # +1
gost 06.01.2020 19:53 # 0