Pristine Ack-5.5
[Ack-5.5.git] / lang / cem / ctest / ctinit / init.cem.g
1 Integers:
2
3 in1     4
4 in2     32767
5 in3     -32768
6 in4     0
7 inzero  0
8
9 ice1    2
10 ice2    8
11 ice3    1
12 ice4    0
13 ice5    7
14 ice6    19
15
16 ina     1,3,5
17
18 sint    -1
19 lint    -32765
20
21 Characters:
22
23 ch1     a(97)
24 ch2     0
25 cha1    Mesg
26 cha2    
27 cha3    1
28 cha4    12
29 cha5    0123456789112345678921234567893123456789412345678951234567896123456789712345678981234567899123456789
30
31 cha6    1, 2, 3
32         4, 5, 6
33 pch1==cha2      yes
34 pch2    pch2
35 pch3    pch3
36 pch4==0 yes
37
38 stc     123
39 stc1    1234
40 mult[0],mult[1],mult[2] ab, bc, de
41 Floats:
42
43 fl1     0.00000000000000000000e+00
44 fl2     2.00000000000000000000e+00
45 fl2     2.00000000000000000000e+00
46 fl4     4.00000000000000000000e+00
47 fl5     2.93873587705571876995e-39
48 fl6     1.70141173319264429908e+38
49 fl7     0.00000000000000000000e+00
50     fla1                    fla2                    fla3
51             1.000000e+00           -1.000000e+00            1.100000e+01
52             3.000000e+00           -3.000000e+00            0.000000e+00
53             5.000000e+00           -5.000000e+00            0.000000e+00
54             2.000000e+00           -2.000000e+00            1.200000e+01
55             4.000000e+00           -4.000000e+00            0.000000e+00
56             6.000000e+00           -6.000000e+00            0.000000e+00
57             3.000000e+00           -3.000000e+00            1.300000e+01
58             5.000000e+00           -5.000000e+00            0.000000e+00
59             7.000000e+00           -7.000000e+00            0.000000e+00
60             0.000000e+00            0.000000e+00            1.400000e+01
61             0.000000e+00            0.000000e+00            0.000000e+00
62             0.000000e+00            0.000000e+00            0.000000e+00
63
64 Doubles:
65
66 dbl1    0.00000000000000000000e+00
67 dbl2    2.00000000000000000000e+00
68 dbl2    2.00000000000000000000e+00
69 dbl4    4.00000000000000000000e+00
70 dbl5    2.93873600000000015650e-39
71 dbl6    1.70141169999999996199e+38
72 dbl7    0.00000000000000000000e+00
73     dbla1                    dbla2                    dbla3
74             1.000000e+00           -1.000000e+00            1.100000e+01
75             3.000000e+00           -3.000000e+00            0.000000e+00
76             5.000000e+00           -5.000000e+00            0.000000e+00
77             2.000000e+00           -2.000000e+00            1.200000e+01
78             4.000000e+00           -4.000000e+00            0.000000e+00
79             6.000000e+00           -6.000000e+00            0.000000e+00
80             3.000000e+00           -3.000000e+00            1.300000e+01
81             5.000000e+00           -5.000000e+00            0.000000e+00
82             7.000000e+00           -7.000000e+00            0.000000e+00
83             0.000000e+00            0.000000e+00            1.400000e+01
84             0.000000e+00            0.000000e+00            0.000000e+00
85             0.000000e+00            0.000000e+00            0.000000e+00
86
87 long
88
89 lo1     14
90 lo2     -17
91 lo3     2147483647
92 lo4     -2147483648
93 lo5     0
94 lo6     1
95
96 structures
97
98          st1          sta[0..2]
99 s_i                   0              1              2              3
100 s_ca[0]               0             97              0              0
101 s_ca[1]               0             98              0              0
102 s_ca[2]               0             99              0              0
103 s_l                   0             10              0              0
104 s_f        0.000000e+00  -1.000000e+01   0.000000e+00   0.000000e+00
105
106 (sta[0].s_s1)->s_i = 1
107
108 bit fields:
109
110 sizeof stb 8
111 stb     -1 -2 3 4 -1 6 7
112