blob: d767190e594d47c9c9e3a9374622ec957758f312 [file] [log] [blame]
Misha Brukman5b160f12004-08-11 14:16:34 +00001%a_str = internal constant [8 x sbyte] c"a = %d\0A\00"
2%b_str = internal constant [8 x sbyte] c"b = %d\0A\00"
3;; binary ops: arith
4%add_str = internal constant [12 x sbyte] c"a + b = %d\0A\00"
5%sub_str = internal constant [12 x sbyte] c"a - b = %d\0A\00"
6%mul_str = internal constant [12 x sbyte] c"a * b = %d\0A\00"
7%div_str = internal constant [12 x sbyte] c"b / a = %d\0A\00"
8%rem_str = internal constant [13 x sbyte] c"b \% a = %d\0A\00"
9;; binary ops: setcc
10%lt_str = internal constant [12 x sbyte] c"a < b = %d\0A\00"
11%le_str = internal constant [13 x sbyte] c"a <= b = %d\0A\00"
12%gt_str = internal constant [12 x sbyte] c"a > b = %d\0A\00"
13%ge_str = internal constant [13 x sbyte] c"a >= b = %d\0A\00"
14%eq_str = internal constant [13 x sbyte] c"a == b = %d\0A\00"
15%ne_str = internal constant [13 x sbyte] c"a != b = %d\0A\00"
16;; logical
17%and_str = internal constant [12 x sbyte] c"a & b = %d\0A\00"
18%or_str = internal constant [12 x sbyte] c"a | b = %d\0A\00"
19%xor_str = internal constant [12 x sbyte] c"a ^ b = %d\0A\00"
20%shl_str = internal constant [13 x sbyte] c"b << a = %d\0A\00"
21%shr_str = internal constant [13 x sbyte] c"b >> a = %d\0A\00"
22
23declare int %printf(sbyte*, ...)
24%A = global int 2
25%B = global int 5
26
27int %main() {
28 ;; main vars
29 %a = load int* %A
30 %b = load int* %B
31
32 %a_s = getelementptr [8 x sbyte]* %a_str, long 0, long 0
33 %b_s = getelementptr [8 x sbyte]* %b_str, long 0, long 0
34
35 call int (sbyte*, ...)* %printf(sbyte* %a_s, int %a)
36 call int (sbyte*, ...)* %printf(sbyte* %b_s, int %b)
37
38 ;; arithmetic
39 %add_r = add int %a, %b
40 %sub_r = sub int %a, %b
41 %mul_r = mul int %a, %b
42 %div_r = div int %b, %a
43 %rem_r = rem int %b, %a
44
45 %add_s = getelementptr [12 x sbyte]* %add_str, long 0, long 0
46 %sub_s = getelementptr [12 x sbyte]* %sub_str, long 0, long 0
47 %mul_s = getelementptr [12 x sbyte]* %mul_str, long 0, long 0
48 %div_s = getelementptr [12 x sbyte]* %div_str, long 0, long 0
49 %rem_s = getelementptr [13 x sbyte]* %rem_str, long 0, long 0
50
51 call int (sbyte*, ...)* %printf(sbyte* %add_s, int %add_r)
52 call int (sbyte*, ...)* %printf(sbyte* %sub_s, int %sub_r)
53 call int (sbyte*, ...)* %printf(sbyte* %mul_s, int %mul_r)
54 call int (sbyte*, ...)* %printf(sbyte* %div_s, int %div_r)
55 call int (sbyte*, ...)* %printf(sbyte* %rem_s, int %rem_r)
56
57 ;; setcc
58 %lt_r = setlt int %a, %b
59 %le_r = setle int %a, %b
60 %gt_r = setgt int %a, %b
61 %ge_r = setge int %a, %b
62 %eq_r = seteq int %a, %b
63 %ne_r = setne int %a, %b
64
65 %lt_s = getelementptr [12 x sbyte]* %lt_str, long 0, long 0
66 %le_s = getelementptr [13 x sbyte]* %le_str, long 0, long 0
67 %gt_s = getelementptr [12 x sbyte]* %gt_str, long 0, long 0
68 %ge_s = getelementptr [13 x sbyte]* %ge_str, long 0, long 0
69 %eq_s = getelementptr [13 x sbyte]* %eq_str, long 0, long 0
70 %ne_s = getelementptr [13 x sbyte]* %ne_str, long 0, long 0
71
72 call int (sbyte*, ...)* %printf(sbyte* %lt_s, bool %lt_r)
73 call int (sbyte*, ...)* %printf(sbyte* %le_s, bool %le_r)
74 call int (sbyte*, ...)* %printf(sbyte* %gt_s, bool %gt_r)
75 call int (sbyte*, ...)* %printf(sbyte* %ge_s, bool %ge_r)
76 call int (sbyte*, ...)* %printf(sbyte* %eq_s, bool %eq_r)
77 call int (sbyte*, ...)* %printf(sbyte* %ne_s, bool %ne_r)
78
79 ;; logical
80 %and_r = and int %a, %b
81 %or_r = or int %a, %b
82 %xor_r = xor int %a, %b
83 %u = cast int %a to ubyte
84 %shl_r = shl int %b, ubyte %u
85 %shr_r = shr int %b, ubyte %u
86
87 %and_s = getelementptr [12 x sbyte]* %and_str, long 0, long 0
88 %or_s = getelementptr [12 x sbyte]* %or_str, long 0, long 0
89 %xor_s = getelementptr [12 x sbyte]* %xor_str, long 0, long 0
90 %shl_s = getelementptr [13 x sbyte]* %shl_str, long 0, long 0
91 %shr_s = getelementptr [13 x sbyte]* %shr_str, long 0, long 0
92
93 call int (sbyte*, ...)* %printf(sbyte* %and_s, int %and_r)
94 call int (sbyte*, ...)* %printf(sbyte* %or_s, int %or_r)
95 call int (sbyte*, ...)* %printf(sbyte* %xor_s, int %xor_r)
96 call int (sbyte*, ...)* %printf(sbyte* %shl_s, int %shl_r)
97 call int (sbyte*, ...)* %printf(sbyte* %shr_s, int %shr_r)
98
99 ret int 0
100}