source: doc/theses/aaron_moss_PhD/phd/code/macro-generic.c @ 09ee131

ADTarm-ehast-experimentalenumforall-pointer-decayjacob/cs343-translationnew-ast-unique-exprpthread-emulationqualifiedEnum
Last change on this file since 09ee131 was 48b7085e, checked in by Aaron Moss <a3moss@…>, 6 years ago

Start into generic types design in thesis

  • Property mode set to 100644
File size: 885 bytes
Line 
1#include <stdlib.h>
2#include <stdio.h>
3
4// code is nested in macros
5
6#define list(N) N ## _list
7
8#define list_insert(N) N ## _list_insert
9
10#define list_head(N) N ## _list_head
11
12#define define_list(N, T) \
13        struct list(N) { T value; struct list(N)* next; }; \
14        \
15        void list_insert(N)( struct list(N)** ls, T x ) { \
16                struct list(N)* node = malloc(sizeof(struct list(N))); \
17                node->value = x; node->next = *ls; \
18                *ls = node; \
19        } \
20        \
21        T list_head(N)( const struct list(N)* ls ) { return ls->value; }
22
23define_list(int, int);  // defines int_list
24define_list(string, const char*);  // defines string_list
25
26// use is efficient, but syntactically idiosyncratic
27
28int main() {
29        struct list(int)* il = NULL;
30        list_insert(int)( &il, 42 );
31        printf("%d\n", list_head(int)(il));
32       
33        struct list(string)* sl = NULL;
34        list_insert(string)( &sl, "hello" );
35        printf("%s\n", list_head(string)(sl));
36}
Note: See TracBrowser for help on using the repository browser.