forked from OSchip/llvm-project
Simple hand-coded tests to aid in early development of backends, along with a
Makefile to run ad-hoc tests easily. llvm-svn: 15664
This commit is contained in:
parent
7224ee1e4c
commit
81f6ee8070
|
@ -0,0 +1,23 @@
|
||||||
|
# Makefile for running ad-hoc custom LLVM tests
|
||||||
|
#
|
||||||
|
%.bc: %.ll
|
||||||
|
llvm-as -f $<
|
||||||
|
|
||||||
|
%.llc.s: %.bc
|
||||||
|
llc -f $< -o $@
|
||||||
|
|
||||||
|
%.gcc.s: %.c
|
||||||
|
gcc -O0 -S $< -o $@
|
||||||
|
|
||||||
|
%.nat: %.s
|
||||||
|
gcc -O0 -lm $< -o $@
|
||||||
|
|
||||||
|
%.cbe.out: %.cbe.nat
|
||||||
|
./$< > $@
|
||||||
|
|
||||||
|
%.out: %.nat
|
||||||
|
./$< > $@
|
||||||
|
|
||||||
|
%.clean:
|
||||||
|
rm -f $(patsubst %.clean,%.bc,$@) $(patsubst %.clean,%.*.s,$@) \
|
||||||
|
$(patsubst %.clean,%.*.nat,$@) $(patsubst %.clean,%.*.out,$@)
|
|
@ -0,0 +1,15 @@
|
||||||
|
#include <stdio.h>
|
||||||
|
int a = 1, b = 2;
|
||||||
|
|
||||||
|
int main() {
|
||||||
|
int i,j;
|
||||||
|
for (i=15; i>=0; --i) {
|
||||||
|
if (a < i) printf("%d < %d\n", a, i);
|
||||||
|
else printf("%d >= %d\n", a, i);
|
||||||
|
for (j=2; j <= 25; j++) {
|
||||||
|
printf("%d, ", j);
|
||||||
|
}
|
||||||
|
printf("\n");
|
||||||
|
}
|
||||||
|
return 0;
|
||||||
|
}
|
|
@ -0,0 +1,8 @@
|
||||||
|
int %foo(int %x) {
|
||||||
|
ret int %x
|
||||||
|
}
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%r = call int %foo(int 0)
|
||||||
|
ret int %r
|
||||||
|
}
|
|
@ -0,0 +1,8 @@
|
||||||
|
int %foo(int %x) {
|
||||||
|
ret int 42
|
||||||
|
}
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%r = call int %foo(int 15)
|
||||||
|
ret int %r
|
||||||
|
}
|
|
@ -0,0 +1,8 @@
|
||||||
|
void %foo() {
|
||||||
|
ret void
|
||||||
|
}
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
call void ()* %foo()
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,13 @@
|
||||||
|
int %bar(int %x) {
|
||||||
|
ret int 0
|
||||||
|
}
|
||||||
|
|
||||||
|
int %foo(int %x) {
|
||||||
|
%q = call int %bar(int 1)
|
||||||
|
ret int %q
|
||||||
|
}
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%r = call int %foo(int 2)
|
||||||
|
ret int %r
|
||||||
|
}
|
|
@ -0,0 +1,47 @@
|
||||||
|
%a_fstr = internal constant [8 x sbyte] c"a = %f\0A\00"
|
||||||
|
%a_lstr = internal constant [10 x sbyte] c"a = %lld\0A\00"
|
||||||
|
%a_dstr = internal constant [8 x sbyte] c"a = %d\0A\00"
|
||||||
|
|
||||||
|
%b_dstr = internal constant [8 x sbyte] c"b = %d\0A\00"
|
||||||
|
%b_fstr = internal constant [8 x sbyte] c"b = %f\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
%A = global double 2.0
|
||||||
|
%B = global int 2
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
;; A
|
||||||
|
%a = load double* %A
|
||||||
|
%a_fs = getelementptr [8 x sbyte]* %a_fstr, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_fs, double %a)
|
||||||
|
|
||||||
|
;; cast double to long
|
||||||
|
%a_d2l = cast double %a to long
|
||||||
|
%a_ls = getelementptr [10 x sbyte]* %a_lstr, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_ls, long %a_d2l)
|
||||||
|
|
||||||
|
;; cast double to int
|
||||||
|
%a_d2i = cast double %a to int
|
||||||
|
%a_ds = getelementptr [8 x sbyte]* %a_dstr, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_ds, int %a_d2i)
|
||||||
|
|
||||||
|
;; cast double to sbyte
|
||||||
|
%a_d2sb = cast double %a to sbyte
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_ds, sbyte %a_d2sb)
|
||||||
|
|
||||||
|
;; cast int to sbyte
|
||||||
|
%a_d2i2sb = cast int %a_d2i to sbyte
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_ds, sbyte %a_d2i2sb)
|
||||||
|
|
||||||
|
;; B
|
||||||
|
%b = load int* %B
|
||||||
|
%b_ds = getelementptr [8 x sbyte]* %b_dstr, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %b_ds, int %b)
|
||||||
|
|
||||||
|
;; cast int to double
|
||||||
|
%b_i2d = cast int %b to double
|
||||||
|
%b_fs = getelementptr [8 x sbyte]* %b_fstr, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %b_fs, double %b_i2d)
|
||||||
|
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,6 @@
|
||||||
|
%g = global int 0
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%h = load int* %g
|
||||||
|
ret int %h
|
||||||
|
}
|
|
@ -0,0 +1,9 @@
|
||||||
|
%.str_1 = internal constant [7 x sbyte] c"hello\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%s = getelementptr [7 x sbyte]* %.str_1, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %s)
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,16 @@
|
||||||
|
%.str_1 = internal constant [4 x sbyte] c"%d\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%f = getelementptr [4 x sbyte]* %.str_1, long 0, long 0
|
||||||
|
%d = add int 1, 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %f, int %d)
|
||||||
|
%e = add int 38, 2
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %f, int %e)
|
||||||
|
%g = add int %d, %d
|
||||||
|
%h = add int %e, %g
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %f, int %h)
|
||||||
|
ret int 0
|
||||||
|
}
|
||||||
|
|
|
@ -0,0 +1,74 @@
|
||||||
|
%a_str = internal constant [8 x sbyte] c"a = %f\0A\00"
|
||||||
|
%b_str = internal constant [8 x sbyte] c"b = %f\0A\00"
|
||||||
|
;; binary ops: arith
|
||||||
|
%add_str = internal constant [12 x sbyte] c"a + b = %f\0A\00"
|
||||||
|
%sub_str = internal constant [12 x sbyte] c"a - b = %f\0A\00"
|
||||||
|
%mul_str = internal constant [12 x sbyte] c"a * b = %f\0A\00"
|
||||||
|
%div_str = internal constant [12 x sbyte] c"b / a = %f\0A\00"
|
||||||
|
%rem_str = internal constant [13 x sbyte] c"b %% a = %f\0A\00"
|
||||||
|
;; binary ops: setcc
|
||||||
|
%lt_str = internal constant [12 x sbyte] c"a < b = %d\0A\00"
|
||||||
|
%le_str = internal constant [13 x sbyte] c"a <= b = %d\0A\00"
|
||||||
|
%gt_str = internal constant [12 x sbyte] c"a > b = %d\0A\00"
|
||||||
|
%ge_str = internal constant [13 x sbyte] c"a >= b = %d\0A\00"
|
||||||
|
%eq_str = internal constant [13 x sbyte] c"a == b = %d\0A\00"
|
||||||
|
%ne_str = internal constant [13 x sbyte] c"a != b = %d\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
%A = global double 2.0
|
||||||
|
%B = global double 5.0
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
;; main vars
|
||||||
|
%a = load double* %A
|
||||||
|
%b = load double* %B
|
||||||
|
|
||||||
|
%a_s = getelementptr [8 x sbyte]* %a_str, long 0, long 0
|
||||||
|
%b_s = getelementptr [8 x sbyte]* %b_str, long 0, long 0
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_s, double %a)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %b_s, double %b)
|
||||||
|
|
||||||
|
;; arithmetic
|
||||||
|
%add_r = add double %a, %b
|
||||||
|
%sub_r = sub double %a, %b
|
||||||
|
%mul_r = mul double %a, %b
|
||||||
|
%div_r = div double %b, %a
|
||||||
|
%rem_r = rem double %b, %a
|
||||||
|
|
||||||
|
%add_s = getelementptr [12 x sbyte]* %add_str, long 0, long 0
|
||||||
|
%sub_s = getelementptr [12 x sbyte]* %sub_str, long 0, long 0
|
||||||
|
%mul_s = getelementptr [12 x sbyte]* %mul_str, long 0, long 0
|
||||||
|
%div_s = getelementptr [12 x sbyte]* %div_str, long 0, long 0
|
||||||
|
%rem_s = getelementptr [13 x sbyte]* %rem_str, long 0, long 0
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %add_s, double %add_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %sub_s, double %sub_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %mul_s, double %mul_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %div_s, double %div_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %rem_s, double %rem_r)
|
||||||
|
|
||||||
|
;; setcc
|
||||||
|
%lt_r = setlt double %a, %b
|
||||||
|
%le_r = setle double %a, %b
|
||||||
|
%gt_r = setgt double %a, %b
|
||||||
|
%ge_r = setge double %a, %b
|
||||||
|
%eq_r = seteq double %a, %b
|
||||||
|
%ne_r = setne double %a, %b
|
||||||
|
|
||||||
|
%lt_s = getelementptr [12 x sbyte]* %lt_str, long 0, long 0
|
||||||
|
%le_s = getelementptr [13 x sbyte]* %le_str, long 0, long 0
|
||||||
|
%gt_s = getelementptr [12 x sbyte]* %gt_str, long 0, long 0
|
||||||
|
%ge_s = getelementptr [13 x sbyte]* %ge_str, long 0, long 0
|
||||||
|
%eq_s = getelementptr [13 x sbyte]* %eq_str, long 0, long 0
|
||||||
|
%ne_s = getelementptr [13 x sbyte]* %ne_str, long 0, long 0
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %lt_s, bool %lt_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %le_s, bool %le_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %gt_s, bool %gt_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %ge_s, bool %ge_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %eq_s, bool %eq_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %ne_s, bool %ne_r)
|
||||||
|
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,100 @@
|
||||||
|
%a_str = internal constant [8 x sbyte] c"a = %d\0A\00"
|
||||||
|
%b_str = internal constant [8 x sbyte] c"b = %d\0A\00"
|
||||||
|
;; binary ops: arith
|
||||||
|
%add_str = internal constant [12 x sbyte] c"a + b = %d\0A\00"
|
||||||
|
%sub_str = internal constant [12 x sbyte] c"a - b = %d\0A\00"
|
||||||
|
%mul_str = internal constant [12 x sbyte] c"a * b = %d\0A\00"
|
||||||
|
%div_str = internal constant [12 x sbyte] c"b / a = %d\0A\00"
|
||||||
|
%rem_str = internal constant [13 x sbyte] c"b \% a = %d\0A\00"
|
||||||
|
;; binary ops: setcc
|
||||||
|
%lt_str = internal constant [12 x sbyte] c"a < b = %d\0A\00"
|
||||||
|
%le_str = internal constant [13 x sbyte] c"a <= b = %d\0A\00"
|
||||||
|
%gt_str = internal constant [12 x sbyte] c"a > b = %d\0A\00"
|
||||||
|
%ge_str = internal constant [13 x sbyte] c"a >= b = %d\0A\00"
|
||||||
|
%eq_str = internal constant [13 x sbyte] c"a == b = %d\0A\00"
|
||||||
|
%ne_str = internal constant [13 x sbyte] c"a != b = %d\0A\00"
|
||||||
|
;; logical
|
||||||
|
%and_str = internal constant [12 x sbyte] c"a & b = %d\0A\00"
|
||||||
|
%or_str = internal constant [12 x sbyte] c"a | b = %d\0A\00"
|
||||||
|
%xor_str = internal constant [12 x sbyte] c"a ^ b = %d\0A\00"
|
||||||
|
%shl_str = internal constant [13 x sbyte] c"b << a = %d\0A\00"
|
||||||
|
%shr_str = internal constant [13 x sbyte] c"b >> a = %d\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
%A = global int 2
|
||||||
|
%B = global int 5
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
;; main vars
|
||||||
|
%a = load int* %A
|
||||||
|
%b = load int* %B
|
||||||
|
|
||||||
|
%a_s = getelementptr [8 x sbyte]* %a_str, long 0, long 0
|
||||||
|
%b_s = getelementptr [8 x sbyte]* %b_str, long 0, long 0
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_s, int %a)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %b_s, int %b)
|
||||||
|
|
||||||
|
;; arithmetic
|
||||||
|
%add_r = add int %a, %b
|
||||||
|
%sub_r = sub int %a, %b
|
||||||
|
%mul_r = mul int %a, %b
|
||||||
|
%div_r = div int %b, %a
|
||||||
|
%rem_r = rem int %b, %a
|
||||||
|
|
||||||
|
%add_s = getelementptr [12 x sbyte]* %add_str, long 0, long 0
|
||||||
|
%sub_s = getelementptr [12 x sbyte]* %sub_str, long 0, long 0
|
||||||
|
%mul_s = getelementptr [12 x sbyte]* %mul_str, long 0, long 0
|
||||||
|
%div_s = getelementptr [12 x sbyte]* %div_str, long 0, long 0
|
||||||
|
%rem_s = getelementptr [13 x sbyte]* %rem_str, long 0, long 0
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %add_s, int %add_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %sub_s, int %sub_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %mul_s, int %mul_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %div_s, int %div_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %rem_s, int %rem_r)
|
||||||
|
|
||||||
|
;; setcc
|
||||||
|
%lt_r = setlt int %a, %b
|
||||||
|
%le_r = setle int %a, %b
|
||||||
|
%gt_r = setgt int %a, %b
|
||||||
|
%ge_r = setge int %a, %b
|
||||||
|
%eq_r = seteq int %a, %b
|
||||||
|
%ne_r = setne int %a, %b
|
||||||
|
|
||||||
|
%lt_s = getelementptr [12 x sbyte]* %lt_str, long 0, long 0
|
||||||
|
%le_s = getelementptr [13 x sbyte]* %le_str, long 0, long 0
|
||||||
|
%gt_s = getelementptr [12 x sbyte]* %gt_str, long 0, long 0
|
||||||
|
%ge_s = getelementptr [13 x sbyte]* %ge_str, long 0, long 0
|
||||||
|
%eq_s = getelementptr [13 x sbyte]* %eq_str, long 0, long 0
|
||||||
|
%ne_s = getelementptr [13 x sbyte]* %ne_str, long 0, long 0
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %lt_s, bool %lt_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %le_s, bool %le_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %gt_s, bool %gt_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %ge_s, bool %ge_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %eq_s, bool %eq_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %ne_s, bool %ne_r)
|
||||||
|
|
||||||
|
;; logical
|
||||||
|
%and_r = and int %a, %b
|
||||||
|
%or_r = or int %a, %b
|
||||||
|
%xor_r = xor int %a, %b
|
||||||
|
%u = cast int %a to ubyte
|
||||||
|
%shl_r = shl int %b, ubyte %u
|
||||||
|
%shr_r = shr int %b, ubyte %u
|
||||||
|
|
||||||
|
%and_s = getelementptr [12 x sbyte]* %and_str, long 0, long 0
|
||||||
|
%or_s = getelementptr [12 x sbyte]* %or_str, long 0, long 0
|
||||||
|
%xor_s = getelementptr [12 x sbyte]* %xor_str, long 0, long 0
|
||||||
|
%shl_s = getelementptr [13 x sbyte]* %shl_str, long 0, long 0
|
||||||
|
%shr_s = getelementptr [13 x sbyte]* %shr_str, long 0, long 0
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %and_s, int %and_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %or_s, int %or_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %xor_s, int %xor_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %shl_s, int %shl_r)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %shr_s, int %shr_r)
|
||||||
|
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,11 @@
|
||||||
|
%.str_1 = internal constant [4 x sbyte] c"%d\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%f = getelementptr [4 x sbyte]* %.str_1, long 0, long 0
|
||||||
|
%d = add int 0, 0
|
||||||
|
%tmp.0 = call int (sbyte*, ...)* %printf(sbyte* %f, int %d)
|
||||||
|
ret int 0
|
||||||
|
}
|
||||||
|
|
|
@ -0,0 +1,55 @@
|
||||||
|
%a_str = internal constant [8 x sbyte] c"a = %d\0A\00"
|
||||||
|
%a_mul_str = internal constant [13 x sbyte] c"a * %d = %d\0A\00"
|
||||||
|
%A = global int 2
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
%a = load int* %A
|
||||||
|
%a_s = getelementptr [8 x sbyte]* %a_str, long 0, long 0
|
||||||
|
%a_mul_s = getelementptr [13 x sbyte]* %a_mul_str, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_s, int %a)
|
||||||
|
|
||||||
|
%r_0 = mul int %a, 0
|
||||||
|
%r_1 = mul int %a, 1
|
||||||
|
%r_2 = mul int %a, 2
|
||||||
|
%r_3 = mul int %a, 3
|
||||||
|
%r_4 = mul int %a, 4
|
||||||
|
%r_5 = mul int %a, 5
|
||||||
|
%r_6 = mul int %a, 6
|
||||||
|
%r_7 = mul int %a, 7
|
||||||
|
%r_8 = mul int %a, 8
|
||||||
|
%r_9 = mul int %a, 9
|
||||||
|
%r_10 = mul int %a, 10
|
||||||
|
%r_11 = mul int %a, 11
|
||||||
|
%r_12 = mul int %a, 12
|
||||||
|
%r_13 = mul int %a, 13
|
||||||
|
%r_14 = mul int %a, 14
|
||||||
|
%r_15 = mul int %a, 15
|
||||||
|
%r_16 = mul int %a, 16
|
||||||
|
%r_17 = mul int %a, 17
|
||||||
|
%r_18 = mul int %a, 18
|
||||||
|
%r_19 = mul int %a, 19
|
||||||
|
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 0, int %r_0)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 1, int %r_1)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 2, int %r_2)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 3, int %r_3)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 4, int %r_4)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 5, int %r_5)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 6, int %r_6)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 7, int %r_7)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 8, int %r_8)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 9, int %r_9)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 10, int %r_10)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 11, int %r_11)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 12, int %r_12)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 13, int %r_13)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 14, int %r_14)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 15, int %r_15)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 16, int %r_16)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 17, int %r_17)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 18, int %r_18)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int 19, int %r_19)
|
||||||
|
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,33 @@
|
||||||
|
%a_str = internal constant [8 x sbyte] c"a = %d\0A\00"
|
||||||
|
%b_str = internal constant [8 x sbyte] c"b = %d\0A\00"
|
||||||
|
|
||||||
|
;; mul
|
||||||
|
%a_mul_str = internal constant [13 x sbyte] c"a * %d = %d\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
%A = global int 2
|
||||||
|
%B = global int 5
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
entry:
|
||||||
|
%a = load int* %A
|
||||||
|
%b = load int* %B
|
||||||
|
%a_s = getelementptr [8 x sbyte]* %a_str, long 0, long 0
|
||||||
|
%b_s = getelementptr [8 x sbyte]* %b_str, long 0, long 0
|
||||||
|
%a_mul_s = getelementptr [13 x sbyte]* %a_mul_str, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_s, int %a)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %b_s, int %b)
|
||||||
|
br label %shl_test
|
||||||
|
|
||||||
|
shl_test:
|
||||||
|
;; test mul by 0-255
|
||||||
|
%s = phi int [ 0, %entry ], [ %s_inc, %shl_test ]
|
||||||
|
%result = mul int %a, %s
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_mul_s, int %s, int %result)
|
||||||
|
%s_inc = add int %s, 1
|
||||||
|
%done = seteq int %s, 256
|
||||||
|
br bool %done, label %fini, label %shl_test
|
||||||
|
|
||||||
|
fini:
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,33 @@
|
||||||
|
%a_str = internal constant [8 x sbyte] c"a = %d\0A\00"
|
||||||
|
%b_str = internal constant [8 x sbyte] c"b = %d\0A\00"
|
||||||
|
|
||||||
|
;; shl
|
||||||
|
%a_shl_str = internal constant [14 x sbyte] c"a << %d = %d\0A\00"
|
||||||
|
|
||||||
|
declare int %printf(sbyte*, ...)
|
||||||
|
%A = global int 2
|
||||||
|
%B = global int 5
|
||||||
|
|
||||||
|
int %main() {
|
||||||
|
entry:
|
||||||
|
%a = load int* %A
|
||||||
|
%b = load int* %B
|
||||||
|
%a_s = getelementptr [8 x sbyte]* %a_str, long 0, long 0
|
||||||
|
%b_s = getelementptr [8 x sbyte]* %b_str, long 0, long 0
|
||||||
|
%a_shl_s = getelementptr [14 x sbyte]* %a_shl_str, long 0, long 0
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_s, int %a)
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %b_s, int %b)
|
||||||
|
br label %shl_test
|
||||||
|
|
||||||
|
shl_test:
|
||||||
|
;; test left shifts 0-31
|
||||||
|
%s = phi ubyte [ 0, %entry ], [ %s_inc, %shl_test ]
|
||||||
|
%result = shl int %a, ubyte %s
|
||||||
|
call int (sbyte*, ...)* %printf(sbyte* %a_shl_s, ubyte %s, int %result)
|
||||||
|
%s_inc = add ubyte %s, 1
|
||||||
|
%done = seteq ubyte %s, 32
|
||||||
|
br bool %done, label %fini, label %shl_test
|
||||||
|
|
||||||
|
fini:
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,7 @@
|
||||||
|
void printf(char*, ...);
|
||||||
|
|
||||||
|
int main() {
|
||||||
|
printf("%f, %d, %f, %d, %f\n", //, %d, %f, %d, %f, %d\n",
|
||||||
|
1.0, 2, 3.0, 4, 5.0 /*, 6, 7.0, 8, 9.0, 10*/);
|
||||||
|
return 0;
|
||||||
|
}
|
|
@ -0,0 +1,3 @@
|
||||||
|
int %main() {
|
||||||
|
ret int 0
|
||||||
|
}
|
|
@ -0,0 +1,3 @@
|
||||||
|
int %main() {
|
||||||
|
ret int 42
|
||||||
|
}
|
|
@ -0,0 +1,39 @@
|
||||||
|
void printf(char*, ...);
|
||||||
|
|
||||||
|
typedef struct params_ {
|
||||||
|
int i1;
|
||||||
|
float f1;
|
||||||
|
double d1;
|
||||||
|
short s1;
|
||||||
|
double d2;
|
||||||
|
char c1;
|
||||||
|
unsigned short s2;
|
||||||
|
float f2;
|
||||||
|
int i2;
|
||||||
|
} params;
|
||||||
|
|
||||||
|
void print_param(params p) {
|
||||||
|
printf("%d, %f, %f, %d, %f, %c, %d, %f, %d\n",
|
||||||
|
p.i1, p.f1, p.d1, p.s1, p.d2, p.c1, p.s2, p.f2, p.i2);
|
||||||
|
}
|
||||||
|
|
||||||
|
void print_param_addr(params *p) {
|
||||||
|
printf("%d, %f, %f, %d, %f, %c, %d, %f, %d\n",
|
||||||
|
p->i1, p->f1, p->d1, p->s1, p->d2, p->c1, p->s2, p->f2, p->i2);
|
||||||
|
}
|
||||||
|
|
||||||
|
int main() {
|
||||||
|
params p;
|
||||||
|
p.i1 = 1;
|
||||||
|
p.f1 = 2.0;
|
||||||
|
p.d1 = 3.0;
|
||||||
|
p.s1 = 4;
|
||||||
|
p.d2 = 5.0;
|
||||||
|
p.c1 = '6';
|
||||||
|
p.s2 = 7;
|
||||||
|
p.f2 = 8.0;
|
||||||
|
p.i2 = 9;
|
||||||
|
print_param(p);
|
||||||
|
print_param_addr(&p);
|
||||||
|
return 0;
|
||||||
|
}
|
Loading…
Reference in New Issue