blob: 446dbea3fd800c7d312792707d272ef8de86426d [file] [log] [blame]
Tanya Lattnercd0aa812004-11-06 21:40:51 +00001; RUN: llvm-as < %s | llc
2
Misha Brukman5b160f12004-08-11 14:16:34 +00003%a_str = internal constant [8 x sbyte] c"a = %f\0A\00"
4%b_str = internal constant [8 x sbyte] c"b = %f\0A\00"
5;; binary ops: arith
6%add_str = internal constant [12 x sbyte] c"a + b = %f\0A\00"
7%sub_str = internal constant [12 x sbyte] c"a - b = %f\0A\00"
8%mul_str = internal constant [12 x sbyte] c"a * b = %f\0A\00"
9%div_str = internal constant [12 x sbyte] c"b / a = %f\0A\00"
10%rem_str = internal constant [13 x sbyte] c"b %% a = %f\0A\00"
11;; binary ops: setcc
12%lt_str = internal constant [12 x sbyte] c"a < b = %d\0A\00"
13%le_str = internal constant [13 x sbyte] c"a <= b = %d\0A\00"
14%gt_str = internal constant [12 x sbyte] c"a > b = %d\0A\00"
15%ge_str = internal constant [13 x sbyte] c"a >= b = %d\0A\00"
16%eq_str = internal constant [13 x sbyte] c"a == b = %d\0A\00"
17%ne_str = internal constant [13 x sbyte] c"a != b = %d\0A\00"
18
19declare int %printf(sbyte*, ...)
20%A = global double 2.0
21%B = global double 5.0
22
23int %main() {
24 ;; main vars
25 %a = load double* %A
26 %b = load double* %B
27
28 %a_s = getelementptr [8 x sbyte]* %a_str, long 0, long 0
29 %b_s = getelementptr [8 x sbyte]* %b_str, long 0, long 0
30
31 call int (sbyte*, ...)* %printf(sbyte* %a_s, double %a)
32 call int (sbyte*, ...)* %printf(sbyte* %b_s, double %b)
33
34 ;; arithmetic
35 %add_r = add double %a, %b
36 %sub_r = sub double %a, %b
37 %mul_r = mul double %a, %b
38 %div_r = div double %b, %a
39 %rem_r = rem double %b, %a
40
41 %add_s = getelementptr [12 x sbyte]* %add_str, long 0, long 0
42 %sub_s = getelementptr [12 x sbyte]* %sub_str, long 0, long 0
43 %mul_s = getelementptr [12 x sbyte]* %mul_str, long 0, long 0
44 %div_s = getelementptr [12 x sbyte]* %div_str, long 0, long 0
45 %rem_s = getelementptr [13 x sbyte]* %rem_str, long 0, long 0
46
47 call int (sbyte*, ...)* %printf(sbyte* %add_s, double %add_r)
48 call int (sbyte*, ...)* %printf(sbyte* %sub_s, double %sub_r)
49 call int (sbyte*, ...)* %printf(sbyte* %mul_s, double %mul_r)
50 call int (sbyte*, ...)* %printf(sbyte* %div_s, double %div_r)
51 call int (sbyte*, ...)* %printf(sbyte* %rem_s, double %rem_r)
52
53 ;; setcc
54 %lt_r = setlt double %a, %b
55 %le_r = setle double %a, %b
56 %gt_r = setgt double %a, %b
57 %ge_r = setge double %a, %b
58 %eq_r = seteq double %a, %b
59 %ne_r = setne double %a, %b
60
61 %lt_s = getelementptr [12 x sbyte]* %lt_str, long 0, long 0
62 %le_s = getelementptr [13 x sbyte]* %le_str, long 0, long 0
63 %gt_s = getelementptr [12 x sbyte]* %gt_str, long 0, long 0
64 %ge_s = getelementptr [13 x sbyte]* %ge_str, long 0, long 0
65 %eq_s = getelementptr [13 x sbyte]* %eq_str, long 0, long 0
66 %ne_s = getelementptr [13 x sbyte]* %ne_str, long 0, long 0
67
68 call int (sbyte*, ...)* %printf(sbyte* %lt_s, bool %lt_r)
69 call int (sbyte*, ...)* %printf(sbyte* %le_s, bool %le_r)
70 call int (sbyte*, ...)* %printf(sbyte* %gt_s, bool %gt_r)
71 call int (sbyte*, ...)* %printf(sbyte* %ge_s, bool %ge_r)
72 call int (sbyte*, ...)* %printf(sbyte* %eq_s, bool %eq_r)
73 call int (sbyte*, ...)* %printf(sbyte* %ne_s, bool %ne_r)
74
75 ret int 0
76}