Mercurial > hg > CbC > old > device
view test/macro.c @ 467:32737bad7489
fix list/tag interference
author | kono |
---|---|
date | Sat, 30 Jul 2005 16:01:45 +0900 |
parents | 0c256ea2a97e |
children | a379da780856 |
line wrap: on
line source
int printf(const char *format, ...); int heap[100]; #define car(e) (heap[(int)(e)]) #define cadr(e) (heap[((int)(e))+1]) #define TEST int i; TEST char *a = "test" "test"; #define TEST0 33 #define TEST111 TEST0 #define c(a,b) g(a+1,b+1) #define g(a,b) printf("#0016:%d %d\n",a+1,b+1); #define d(a,b) cadr(b)+3 /* #define stdio stdio #define f(a,b) aho+a+b f (a,b) */ // name concateneation #define name(a,b) name_##b(a) #define name_hoge(c) (c+a) main() { int a,b,e; b = heap[TEST111]; d(a,b); a =1; b = 3; #ifndef a c(a, b); /* 3,5 expected */ #endif e=50; heap[51]=3; heap[3]=4; /* 5,4 expected */ #if 0 g(car(cadr(e)),cadr(e)); #endif #if 0 printf("#0050:1\n"); #elif (1) printf("#0052:2\n"); #elif (2) printf("#0054:3\n"); #else printf("#0056:4\n"); #endif #if 0 printf("#0059:1\n"); #elif (0) printf("#0061:2\n"); #elif (0) printf("#0063:3\n"); #else printf("#0065:4\n"); #endif printf("#0067:%d\n",name(3,hoge)); return 0; } #if 0 #endif /* whoeh wohefwiehfoi */ longlong(int i,int j) { // long long i,j; if (i>j) main(); }