Mercurial > hg > CbC > old > device

annotate test/macro.c @ 67:254a0c576114

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
argument type list
author kono
date Mon, 24 Feb 2003 00:59:30 +0900
parents 9f89cef85b41
children 7aa449aff3e6
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
36
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
1
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
2 int heap[100];
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
3
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
4 #define car(e) (heap[(int)(e)])
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
5 #define cadr(e) (heap[((int)(e))+1])
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
6
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
7 #define TEST
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
8 int i;
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
9 TEST
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
10
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
11 #define c(a,b) g(a+1,b+1)
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
12 #define g(a,b) printf("%d %d\n",a+1,b+1);
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
13
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
14 main() {
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
15 int a,b,e;
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
16
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
17 a =1; b = 3;
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
18 #ifndef a
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
19 c(a,
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
20 b);
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
21 /* 3,5 expected */
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
22 #endif
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
23 car(cadr(e));
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
24 }
9f89cef85b41 *** empty log message ***
kono
parents:
diff changeset
25