; AILang generated workspace; entry: list source_filename = "list.ail" target triple = "" declare i32 @printf(ptr, ...) declare i32 @puts(ptr) declare ptr @ailang_rc_alloc(i64) declare void @ailang_rc_inc(ptr) declare void @ailang_rc_dec(ptr) declare ptr @ailang_drop_worklist_new() declare void @ailang_drop_worklist_push(ptr, ptr) declare ptr @ailang_drop_worklist_pop(ptr) declare void @ailang_drop_worklist_free(ptr) declare i32 @strcmp(ptr, ptr) declare zeroext i1 @ail_str_eq(ptr, ptr) declare i32 @ail_str_compare(ptr, ptr) declare ptr @ailang_int_to_str(i64) declare ptr @ailang_float_to_str(double) declare ptr @ailang_bool_to_str(i1) declare ptr @ailang_str_clone(ptr) declare ptr @ailang_str_concat(ptr, ptr) declare i64 @llvm.fptosi.sat.i64.f64(double) @ail_list_sum_list_clos = private unnamed_addr constant { ptr, ptr } { ptr @ail_list_sum_list_adapter, ptr null } @ail_list_main_clos = private unnamed_addr constant { ptr, ptr } { ptr @ail_list_main_adapter, ptr null } @ail_prelude_show__Int_clos = private unnamed_addr constant { ptr, ptr } { ptr @ail_prelude_show__Int_adapter, ptr null } @ail_prelude_print__Int_clos = private unnamed_addr constant { ptr, ptr } { ptr @ail_prelude_print__Int_adapter, ptr null } define i64 @ail_list_sum_list(ptr %arg_xs) { entry: %v1 = load i64, ptr %arg_xs, align 8 switch i64 %v1, label %mdefault.2 [ i64 0, label %marm.2.0 i64 1, label %marm.2.1 ] marm.2.0: br label %mjoin.2 marm.2.1: %v3 = getelementptr inbounds i8, ptr %arg_xs, i64 8 %v4 = load i64, ptr %v3, align 8 %v5 = getelementptr inbounds i8, ptr %arg_xs, i64 16 %v6 = load ptr, ptr %v5, align 8 %v7 = call i64 @ail_list_sum_list(ptr %v6) %v8 = add i64 %v4, %v7 br label %mjoin.2 mdefault.2: unreachable mjoin.2: %v9 = phi i64 [ 0, %marm.2.0 ], [ %v8, %marm.2.1 ] ret i64 %v9 } define i64 @ail_list_sum_list_adapter(ptr %_env, ptr %a0) { entry: %r = call i64 @ail_list_sum_list(ptr %a0) ret i64 %r } define i8 @ail_list_main() { entry: %v1 = call ptr @ailang_rc_alloc(i64 8) store i64 0, ptr %v1, align 8 %v2 = call ptr @ailang_rc_alloc(i64 24) store i64 1, ptr %v2, align 8 %v3 = getelementptr inbounds i8, ptr %v2, i64 8 store i64 12, ptr %v3, align 8 %v4 = getelementptr inbounds i8, ptr %v2, i64 16 store ptr %v1, ptr %v4, align 8 %v5 = call ptr @ailang_rc_alloc(i64 24) store i64 1, ptr %v5, align 8 %v6 = getelementptr inbounds i8, ptr %v5, i64 8 store i64 20, ptr %v6, align 8 %v7 = getelementptr inbounds i8, ptr %v5, i64 16 store ptr %v2, ptr %v7, align 8 %v8 = call ptr @ailang_rc_alloc(i64 24) store i64 1, ptr %v8, align 8 %v9 = getelementptr inbounds i8, ptr %v8, i64 8 store i64 10, ptr %v9, align 8 %v10 = getelementptr inbounds i8, ptr %v8, i64 16 store ptr %v5, ptr %v10, align 8 %v11 = call i64 @ail_list_sum_list(ptr %v8) %v12 = call i8 @ail_prelude_print__Int(i64 %v11) ret i8 %v12 } define i8 @ail_list_main_adapter(ptr %_env) { entry: %r = call i8 @ail_list_main() ret i8 %r } define void @drop_list_IntList(ptr %p) { entry: %is_null = icmp eq ptr %p, null br i1 %is_null, label %ret, label %live live: %tag = load i64, ptr %p, align 8 switch i64 %tag, label %dflt [ i64 0, label %arm_0 i64 1, label %arm_1 ] arm_0: br label %join arm_1: %a0 = getelementptr inbounds i8, ptr %p, i64 16 %v1 = load ptr, ptr %a0, align 8 call void @drop_list_IntList(ptr %v1) br label %join dflt: unreachable join: call void @ailang_rc_dec(ptr %p) br label %ret ret: ret void } define void @partial_drop_list_IntList(ptr %p, i64 %mask) { entry: %is_null = icmp eq ptr %p, null br i1 %is_null, label %ret, label %live live: %tag = load i64, ptr %p, align 8 switch i64 %tag, label %dflt [ i64 0, label %arm_0 i64 1, label %arm_1 ] arm_0: br label %join arm_1: %b0 = and i64 %mask, 2 %s1 = icmp ne i64 %b0, 0 br i1 %s1, label %after_1_1, label %do_1_1 do_1_1: %a2 = getelementptr inbounds i8, ptr %p, i64 16 %v3 = load ptr, ptr %a2, align 8 call void @drop_list_IntList(ptr %v3) br label %after_1_1 after_1_1: br label %join dflt: unreachable join: call void @ailang_rc_dec(ptr %p) br label %ret ret: ret void } define ptr @ail_prelude_show__Int(i64 %arg_x) { entry: %v1 = call ptr @ailang_int_to_str(i64 %arg_x) ret ptr %v1 } define ptr @ail_prelude_show__Int_adapter(ptr %_env, i64 %a0) { entry: %r = call ptr @ail_prelude_show__Int(i64 %a0) ret ptr %r } define i8 @ail_prelude_print__Int(i64 %arg_x) { entry: %v1 = call ptr @ail_prelude_show__Int(i64 %arg_x) %v2 = getelementptr inbounds i8, ptr %v1, i64 8 call i32 @puts(ptr %v2) call void @ailang_rc_dec(ptr %v1) ret i8 0 } define i8 @ail_prelude_print__Int_adapter(ptr %_env, i64 %a0) { entry: %r = call i8 @ail_prelude_print__Int(i64 %a0) ret i8 %r } define void @drop_prelude_Ordering(ptr %p) { entry: %is_null = icmp eq ptr %p, null br i1 %is_null, label %ret, label %live live: %tag = load i64, ptr %p, align 8 switch i64 %tag, label %dflt [ i64 0, label %arm_0 i64 1, label %arm_1 i64 2, label %arm_2 ] arm_0: br label %join arm_1: br label %join arm_2: br label %join dflt: unreachable join: call void @ailang_rc_dec(ptr %p) br label %ret ret: ret void } define void @partial_drop_prelude_Ordering(ptr %p, i64 %mask) { entry: %is_null = icmp eq ptr %p, null br i1 %is_null, label %ret, label %live live: %tag = load i64, ptr %p, align 8 switch i64 %tag, label %dflt [ i64 0, label %arm_0 i64 1, label %arm_1 i64 2, label %arm_2 ] arm_0: br label %join arm_1: br label %join arm_2: br label %join dflt: unreachable join: call void @ailang_rc_dec(ptr %p) br label %ret ret: ret void } define i32 @main() { call i8 @ail_list_main() ret i32 0 }