annotate test/cext.c @ 831:a22aabb27786

pdecl_data type
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Fri, 03 Dec 2010 11:32:50 +0900
parents 2a4a40168fa4
children d712ee10feb7
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
467
32737bad7489 fix list/tag interference
kono
parents: 427
diff changeset
1 int printf(const char *format, ...);
353
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
2
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
3 unsigned int u;
831
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
4 static char current_file_dir[1024] ;
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
5
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
6 void
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
7 f(char *name)
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
8 {
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
9 char *s = name;
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
10 char *q = current_file_dir;
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
11 printf("%s and %s\n",s,q);
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
12 }
353
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
13
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
14 main()
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
15 {
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
16 int i,k; unsigned uk;
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
17
808
2a4a40168fa4 char is unsigned on Yellow dog.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 491
diff changeset
18 char c = -3;
2a4a40168fa4 char is unsigned on Yellow dog.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 491
diff changeset
19 printf("char is %ssigned\n", c==256-3? "un":"");
2a4a40168fa4 char is unsigned on Yellow dog.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 491
diff changeset
20
353
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
21 for(i=-3;i<4;i++) {
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
22 k = (char) i;
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
23 uk = (unsigned char) i;
491
a379da780856 cond signed/unsigned
kono
parents: 467
diff changeset
24 printf("#0011:%d %u\n",k,uk);
353
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
25 k = (short) i;
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
26 uk = (unsigned short) i;
491
a379da780856 cond signed/unsigned
kono
parents: 467
diff changeset
27 printf("#0014:%d %u\n",k,uk);
353
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
28 }
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
29 u = (unsigned) -23432;
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
30
491
a379da780856 cond signed/unsigned
kono
parents: 467
diff changeset
31 printf("#0018:%d\n",u/(8048+5));
831
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
32
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
33 current_file_dir[0] = 'k';
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
34 current_file_dir[1] = 'a';
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
35 current_file_dir[2] = 't';
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
36 current_file_dir[3] = 'e';
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
37 current_file_dir[4] = 0;
a22aabb27786 pdecl_data type
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 808
diff changeset
38 f("john");
353
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
39 return 0;
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
40 }
41ed77cb9c67 name table reogranization, extendable cheap done.
kono
parents:
diff changeset
41