Mercurial > hg > CbC > old > device

annotate test/cext.c @ 935:7672a37e7545 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Raspbery PI ARM support begin
author kono
date Sat, 24 Dec 2016 03:02:57 +0000
parents d712ee10feb7
children
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;
896
d712ee10feb7 local_nptr for locally defined struct
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 831
diff changeset
11 printf("#0010:%s and %s\n",s,q);
831
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;
896
d712ee10feb7 local_nptr for locally defined struct
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 831
diff changeset
19 printf("#0018:char is %ssigned\n", c==256-3? "un":"");
808
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;
896
d712ee10feb7 local_nptr for locally defined struct
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 831
diff changeset
24 printf("#0023:%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;
896
d712ee10feb7 local_nptr for locally defined struct
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 831
diff changeset
27 printf("#0026:%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
896
d712ee10feb7 local_nptr for locally defined struct
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 831
diff changeset
31 printf("#0030:%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