Quick actions

cmd+k|ctrl+k

Navigation

Languages

Fold Macro

Snippet info

Language

Cpp

Visibility

public

Author

evine

Created

2016-04-30T10:26:52Z

Updated

2016-05-04T09:48:21Z

#ifndef THIS_IS_MACRO_EXPAND_HELLO_THERE
#include <stdio.h>
#include <stdint.h>
#include <stdlib.h>
#endif

static void EmptyCall(){}

#define EXPAND(X) X
#define REMOVEBRACKET(...) __VA_ARGS__

#define TOSTRING_(a) #a
#define TOSTRING(a) TOSTRING_(a)

#define NUM_ARGS_(X32, X31, X30, X29, X28, X27, X26, X25,		\
X24, X23, X22, X21, X20, X19, X18, X17, X16, X15, X14, X13,		\
X12, X11, X10, X9, X8, X7, X6, X5, X4, X3, X2, X1, N, ...) N
#define NUM_ARGS(...) EXPAND(NUM_ARGS_(__VA_ARGS__, 32, 31, 30,	\
29, 28, 27, 26, 25, 24, 23, 22, 21, 20, 19, 18, 17, 16,			\
15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1))

#define FIRSTARG(X, ...) (X)
#define RESTARGS(X, ...) (__VA_ARGS__)
#define FIRSTTWOARG(X, Y, ...) (X,Y)
#define RESTTWOARG(X, Y, ...) (__VA_ARGS__)

#define FOREACH(MACRO, ...) FOREACH_(MACRO, (__VA_ARGS__))
#define FOREACH_(MACRO, ...) FOREACH__(NUM_ARGS __VA_ARGS__, MACRO, __VA_ARGS__)
#define FOREACH__(N, M, ...) FOREACH___(N, M, __VA_ARGS__)
#define FOREACH___(N, M, ...) FOREACH_##N(M, __VA_ARGS__)
#define FOREACH_1(M, ...) M __VA_ARGS__
#define FOREACH_2(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_1(M, RESTARGS __VA_ARGS__)
#define FOREACH_3(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_2(M, RESTARGS __VA_ARGS__)
#define FOREACH_4(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_3(M, RESTARGS __VA_ARGS__)
#define FOREACH_5(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_4(M, RESTARGS __VA_ARGS__)
#define FOREACH_6(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_5(M, RESTARGS __VA_ARGS__)
#define FOREACH_7(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_6(M, RESTARGS __VA_ARGS__)
#define FOREACH_8(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_7(M, RESTARGS __VA_ARGS__)
#define FOREACH_9(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_8(M, RESTARGS __VA_ARGS__)
#define FOREACH_10(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_9(M, RESTARGS __VA_ARGS__)
#define FOREACH_11(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_10(M, RESTARGS __VA_ARGS__)
#define FOREACH_12(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_11(M, RESTARGS __VA_ARGS__)
#define FOREACH_13(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_12(M, RESTARGS __VA_ARGS__)
#define FOREACH_14(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_13(M, RESTARGS __VA_ARGS__)
#define FOREACH_15(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_14(M, RESTARGS __VA_ARGS__)
#define FOREACH_16(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_15(M, RESTARGS __VA_ARGS__)
#define FOREACH_17(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_16(M, RESTARGS __VA_ARGS__)
#define FOREACH_18(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_17(M, RESTARGS __VA_ARGS__)
#define FOREACH_19(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_18(M, RESTARGS __VA_ARGS__)
#define FOREACH_20(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_19(M, RESTARGS __VA_ARGS__)
#define FOREACH_21(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_20(M, RESTARGS __VA_ARGS__)
#define FOREACH_22(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_21(M, RESTARGS __VA_ARGS__)
#define FOREACH_23(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_22(M, RESTARGS __VA_ARGS__)
#define FOREACH_24(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_23(M, RESTARGS __VA_ARGS__)
#define FOREACH_25(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_24(M, RESTARGS __VA_ARGS__)
#define FOREACH_26(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_25(M, RESTARGS __VA_ARGS__)
#define FOREACH_27(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_26(M, RESTARGS __VA_ARGS__)
#define FOREACH_28(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_27(M, RESTARGS __VA_ARGS__)
#define FOREACH_29(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_28(M, RESTARGS __VA_ARGS__)
#define FOREACH_30(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_29(M, RESTARGS __VA_ARGS__)
#define FOREACH_31(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_30(M, RESTARGS __VA_ARGS__)
#define FOREACH_32(M, ...) EXPAND(M FIRSTARG __VA_ARGS__) FOREACH_31(M, RESTARGS __VA_ARGS__)

#define FOLD(MACRO, ...) FOLD_(MACRO, (__VA_ARGS__))
#define FOLD_(MACRO, ...) FOLD__(NUM_ARGS __VA_ARGS__, MACRO, __VA_ARGS__)
#define FOLD__(N, M, ...) FOLD___(N, M, __VA_ARGS__)
#define FOLD___(N, M, ...) FOLD____(N, M, (EXPAND(M FIRSTTWOARG __VA_ARGS__),EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD____(N, M, ...) FOLD_##N(M, __VA_ARGS__)
#define FOLD_END(RESULT) RESULT
#define FOLD_2__(...) FOLD_END(EXPAND(REMOVEBRACKET __VA_ARGS__)) 
#define FOLD_2_(M, ...) FOLD_2__(FIRSTARG (__VA_ARGS__))
#define FOLD_2(M, ...) FOLD_2_( M, EXPAND(REMOVEBRACKET __VA_ARGS__) )
#define FOLD_3_(M, ...) FOLD_END(EXPAND __VA_ARGS__)
#define FOLD_3(M, ...) FOLD_3_( M, ( M FIRSTTWOARG __VA_ARGS__))
#define FOLD_4_(M, ...) FOLD_3(M,__VA_ARGS__)
#define FOLD_4(M, ...) FOLD_4_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_5_(M, ...) FOLD_4(M,__VA_ARGS__)
#define FOLD_5(M, ...) FOLD_5_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_6_(M, ...) FOLD_5(M,__VA_ARGS__)
#define FOLD_6(M, ...) FOLD_6_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_7_(M, ...) FOLD_6(M,__VA_ARGS__)
#define FOLD_7(M, ...) FOLD_7_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_8_(M, ...) FOLD_7(M,__VA_ARGS__)
#define FOLD_8(M, ...) FOLD_8_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_9_(M, ...) FOLD_8(M,__VA_ARGS__)
#define FOLD_9(M, ...) FOLD_9_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_10_(M, ...) FOLD_9(M,__VA_ARGS__)
#define FOLD_10(M, ...) FOLD_10_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_11_(M, ...) FOLD_10(M,__VA_ARGS__)
#define FOLD_11(M, ...) FOLD_11_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_12_(M, ...) FOLD_11(M,__VA_ARGS__)
#define FOLD_12(M, ...) FOLD_12_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_13_(M, ...) FOLD_12(M,__VA_ARGS__)
#define FOLD_13(M, ...) FOLD_13_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_14_(M, ...) FOLD_13(M,__VA_ARGS__)
#define FOLD_14(M, ...) FOLD_14_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_15_(M, ...) FOLD_14(M,__VA_ARGS__)
#define FOLD_15(M, ...) FOLD_15_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_16_(M, ...) FOLD_15(M,__VA_ARGS__)
#define FOLD_16(M, ...) FOLD_16_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_17_(M, ...) FOLD_16(M,__VA_ARGS__)
#define FOLD_17(M, ...) FOLD_17_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_18_(M, ...) FOLD_17(M,__VA_ARGS__)
#define FOLD_18(M, ...) FOLD_18_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_19_(M, ...) FOLD_18(M,__VA_ARGS__)
#define FOLD_19(M, ...) FOLD_19_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_20_(M, ...) FOLD_19(M,__VA_ARGS__)
#define FOLD_20(M, ...) FOLD_20_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_21_(M, ...) FOLD_20(M,__VA_ARGS__)
#define FOLD_21(M, ...) FOLD_21_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_22_(M, ...) FOLD_21(M,__VA_ARGS__)
#define FOLD_22(M, ...) FOLD_22_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_23_(M, ...) FOLD_22(M,__VA_ARGS__)
#define FOLD_23(M, ...) FOLD_23_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_24_(M, ...) FOLD_23(M,__VA_ARGS__)
#define FOLD_24(M, ...) FOLD_24_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_25_(M, ...) FOLD_24(M,__VA_ARGS__)
#define FOLD_25(M, ...) FOLD_25_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_26_(M, ...) FOLD_25(M,__VA_ARGS__)
#define FOLD_26(M, ...) FOLD_26_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_27_(M, ...) FOLD_26(M,__VA_ARGS__)
#define FOLD_27(M, ...) FOLD_27_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_28_(M, ...) FOLD_27(M,__VA_ARGS__)
#define FOLD_28(M, ...) FOLD_28_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_29_(M, ...) FOLD_28(M,__VA_ARGS__)
#define FOLD_29(M, ...) FOLD_29_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_30_(M, ...) FOLD_29(M,__VA_ARGS__)
#define FOLD_30(M, ...) FOLD_30_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_31_(M, ...) FOLD_30(M,__VA_ARGS__)
#define FOLD_31(M, ...) FOLD_31_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))
#define FOLD_32_(M, ...) FOLD_31(M,__VA_ARGS__)
#define FOLD_32(M, ...) FOLD_32_(M,(M FIRSTTWOARG __VA_ARGS__, EXPAND(REMOVEBRACKET RESTTWOARG __VA_ARGS__)))

#define CONCAT_(a, b) a##b
#define CONCAT(...) FOLD(CONCAT_, __VA_ARGS__)
// Tests
//--------------------------------------------------------------------------------
//FOLD(bar,1,2)
//--------------------------------------------------------------------------------
//FOLD(foo,1,2,3)
//--------------------------------------------------------------------------------
//FOLD(dea,1,2,3,4)
//--------------------------------------------------------------------------------
//CONCAT(a,b)
//--------------------------------------------------------------------------------
//CONCAT(a,b,c)
//--------------------------------------------------------------------------------
//CONCAT(a,b,c,d)


typedef uint8_t u8;
typedef uint16_t u16;
typedef uint32_t u32;
typedef uint64_t u64;

typedef char s8;
typedef int16_t s16;
typedef int32_t s32;
typedef int64_t s64;

typedef bool b8;

typedef float f32;
typedef double f64;

typedef uintptr_t uptr;
typedef intptr_t sptr;

#define MAX_(a, b) ((a) > (b) ? (a) : (b))
#define MAX(...) FOLD(MAX_, __VA_ARGS__)
struct string{
    s32 Size;
    s32 Pos;
    s8 *String;
};

#define Concat(...) FOLD(Concat_, __VA_ARGS__)
string *Concat_(string *Buffer, s8 *StringIn)
{
    for(s32 i = 0, j = Buffer->Pos;
        StringIn[i] != 0 && j < Buffer->Size - 1;
        ++i, ++j, ++Buffer->Pos)
    {
        Buffer->String[j] = StringIn[i];
    }
    return Buffer;
}

string *Concat_(string *Buffer, f64 NumberIn)
{
    s8 TempBuffer[20];
    snprintf(TempBuffer, 20, "%g", NumberIn);
    Concat_(Buffer, TempBuffer);
    
    return Buffer;
}


s32 main()
{
    string SomeBuffer;
    SomeBuffer.Size = 50;
    SomeBuffer.Pos = 0;
    SomeBuffer.String = (s8 *)calloc(1, 50);
    
    FOLD(Concat_, &SomeBuffer, "tera_", 10.0, "dwera_", 32.07, "tag\n");
    printf("String Concat(): %s", SomeBuffer.String);
    
    printf("Macro CONCAT(): " TOSTRING( CONCAT(eple_, 2, _ter_, 9, _ea) ) "\n");
    printf("FOLD(): " TOSTRING( FOLD(bar,1,2) ) "\n");
    printf("FOLD(): " TOSTRING( FOLD(bar,1,2,3,4) ) "\n");
    
    printf("MAX(): %i\n", MAX(32, 43) );
    printf("MAX(): %i\n", MAX(1, 2, 3, 4, 5) );
    return 0;
}
INFO