Files
c3c/test/test_suite/bitstruct/bitstruct_be.c3t
2023-02-04 19:48:42 +01:00

205 lines
7.9 KiB
C

// #target: macos-x64
module test;
import std::io;
bitstruct Test : int @bigendian
{
ushort a : 0..15;
ushort b : 16..31;
}
bitstruct Test2 : char[4] @bigendian
{
ushort a : 0..15;
ushort b : 16..31;
}
fn void main()
{
IntBE x;
x.val = 123;
io::printf("BE 123 => %d (%d)\n", (int)x, x.val);
Test abc = { .a = 0x1234, .b = 0x5678 };
Test2 abc2 = { .a = 0x1234, .b = 0x5678 };
char[4]* z = (char[4]*)&abc;
char[4]* z2 = (char[4]*)&abc2;
foreach (d : z2) io::printf(" %x", d);
io::printn("");
foreach (d : z) io::printf(" %x", d);
io::printn("");
io::printfn("abc.a = %x", abc.a);
abc.a = 0x1234;
abc.b = 0x5678;
io::printfn("->abc.a = %x", abc.a);
foreach (d : z) io::printf(" %x", d);
io::printn("");
IntLE y;
y.val = 123;
io::printf("LE 123 => %d (%d)\n", (int)y, y.val);
}
/* #expect: test.ll
%0 = load i32, ptr %x, align 4
%1 = call i32 @llvm.bswap.i32(i32 %0)
store i32 2063597568, ptr %x, align 4
%2 = insertvalue %variant undef, ptr %x, 0
%3 = insertvalue %variant %2, i64 ptrtoint (ptr @"ct$int" to i64), 1
%4 = getelementptr inbounds [2 x %variant], ptr %varargslots, i64 0, i64 0
store %variant %3, ptr %4, align 16
%5 = load i32, ptr %x, align 4
%6 = call i32 @llvm.bswap.i32(i32 %5)
store i32 %6, ptr %taddr, align 4
%7 = insertvalue %variant undef, ptr %taddr, 0
%8 = insertvalue %variant %7, i64 ptrtoint (ptr @"ct$int" to i64), 1
%9 = getelementptr inbounds [2 x %variant], ptr %varargslots, i64 0, i64 1
store %variant %8, ptr %9, align 16
%10 = call i64 @std_io_printf(ptr %retparam, ptr @.str, i64 18, ptr %varargslots, i64 2)
store i32 873625686, ptr %abc, align 4
store [4 x i8] c"\124Vx", ptr %abc2, align 1
store ptr %abc, ptr %z, align 8
store ptr %abc2, ptr %z2, align 8
%11 = load ptr, ptr %z2, align 8
store ptr %11, ptr %.anon, align 8
store i64 0, ptr %.anon1, align 8
br label %loop.cond
loop.cond: ; preds = %loop.body, %entry
%12 = load i64, ptr %.anon1, align 8
%gt = icmp ugt i64 4, %12
br i1 %gt, label %loop.body, label %loop.exit
loop.body: ; preds = %loop.cond
%13 = load ptr, ptr %.anon, align 8
%14 = load i64, ptr %.anon1, align 8
%15 = getelementptr inbounds [4 x i8], ptr %13, i64 0, i64 %14
%16 = load i8, ptr %15, align 1
store i8 %16, ptr %d, align 1
%17 = insertvalue %variant undef, ptr %d, 0
%18 = insertvalue %variant %17, i64 ptrtoint (ptr @"ct$char" to i64), 1
%19 = getelementptr inbounds [1 x %variant], ptr %varargslots3, i64 0, i64 0
store %variant %18, ptr %19, align 16
%20 = call i64 @std_io_printf(ptr %retparam2, ptr @.str.1, i64 3, ptr %varargslots3, i64 1)
%21 = load i64, ptr %.anon1, align 8
%add = add i64 %21, 1
store i64 %add, ptr %.anon1, align 8
br label %loop.cond
loop.exit: ; preds = %loop.cond
store ptr @.str.2, ptr %x4, align 8
%22 = call ptr @std_io_stdout()
store ptr %22, ptr %result, align 8
%23 = call i64 @std_io_File_printn(ptr %retparam5, ptr %result, ptr null, i64 0)
%24 = load ptr, ptr %z, align 8
store ptr %24, ptr %.anon6, align 8
store i64 0, ptr %.anon7, align 8
br label %loop.cond8
loop.cond8: ; preds = %loop.body10, %loop.exit
%25 = load i64, ptr %.anon7, align 8
%gt9 = icmp ugt i64 4, %25
br i1 %gt9, label %loop.body10, label %loop.exit15
loop.body10: ; preds = %loop.cond8
%26 = load ptr, ptr %.anon6, align 8
%27 = load i64, ptr %.anon7, align 8
%28 = getelementptr inbounds [4 x i8], ptr %26, i64 0, i64 %27
%29 = load i8, ptr %28, align 1
store i8 %29, ptr %d11, align 1
%30 = insertvalue %variant undef, ptr %d11, 0
%31 = insertvalue %variant %30, i64 ptrtoint (ptr @"ct$char" to i64), 1
%32 = getelementptr inbounds [1 x %variant], ptr %varargslots13, i64 0, i64 0
store %variant %31, ptr %32, align 16
%33 = call i64 @std_io_printf(ptr %retparam12, ptr @.str.3, i64 3, ptr %varargslots13, i64 1)
%34 = load i64, ptr %.anon7, align 8
%add14 = add i64 %34, 1
store i64 %add14, ptr %.anon7, align 8
br label %loop.cond8
loop.exit15: ; preds = %loop.cond8
store ptr @.str.4, ptr %x16, align 8
%35 = call ptr @std_io_stdout()
store ptr %35, ptr %result18, align 8
%36 = call i64 @std_io_File_printn(ptr %retparam17, ptr %result18, ptr null, i64 0)
%37 = load i32, ptr %abc, align 4
%38 = call i32 @llvm.bswap.i32(i32 %37)
%39 = and i32 65535, %38
%ztrunc = trunc i32 %39 to i16
store i16 %ztrunc, ptr %taddr21, align 2
%40 = insertvalue %variant undef, ptr %taddr21, 0
%41 = insertvalue %variant %40, i64 ptrtoint (ptr @"ct$ushort" to i64), 1
%42 = getelementptr inbounds [1 x %variant], ptr %varargslots20, i64 0, i64 0
store %variant %41, ptr %42, align 16
%43 = call i64 @std_io_printfn(ptr %retparam19, ptr @.str.5, i64 10, ptr %varargslots20, i64 1)
%44 = load i32, ptr %abc, align 4
%45 = call i32 @llvm.bswap.i32(i32 %44)
%46 = and i32 %45, -65536
%47 = or i32 %46, 4660
%48 = call i32 @llvm.bswap.i32(i32 %47)
store i32 %48, ptr %abc, align 4
%49 = load i32, ptr %abc, align 4
%50 = call i32 @llvm.bswap.i32(i32 %49)
%51 = and i32 %50, 65535
%52 = or i32 %51, 1450704896
%53 = call i32 @llvm.bswap.i32(i32 %52)
store i32 %53, ptr %abc, align 4
%54 = load i32, ptr %abc, align 4
%55 = call i32 @llvm.bswap.i32(i32 %54)
%56 = and i32 65535, %55
%ztrunc24 = trunc i32 %56 to i16
store i16 %ztrunc24, ptr %taddr25, align 2
%57 = insertvalue %variant undef, ptr %taddr25, 0
%58 = insertvalue %variant %57, i64 ptrtoint (ptr @"ct$ushort" to i64), 1
%59 = getelementptr inbounds [1 x %variant], ptr %varargslots23, i64 0, i64 0
store %variant %58, ptr %59, align 16
%60 = call i64 @std_io_printfn(ptr %retparam22, ptr @.str.6, i64 12, ptr %varargslots23, i64 1)
%61 = load ptr, ptr %z, align 8
store ptr %61, ptr %.anon26, align 8
store i64 0, ptr %.anon27, align 8
br label %loop.cond28
loop.cond28: ; preds = %loop.body30, %loop.exit15
%62 = load i64, ptr %.anon27, align 8
%gt29 = icmp ugt i64 4, %62
br i1 %gt29, label %loop.body30, label %loop.exit35
loop.body30: ; preds = %loop.cond28
%63 = load ptr, ptr %.anon26, align 8
%64 = load i64, ptr %.anon27, align 8
%65 = getelementptr inbounds [4 x i8], ptr %63, i64 0, i64 %64
%66 = load i8, ptr %65, align 1
store i8 %66, ptr %d31, align 1
%67 = insertvalue %variant undef, ptr %d31, 0
%68 = insertvalue %variant %67, i64 ptrtoint (ptr @"ct$char" to i64), 1
%69 = getelementptr inbounds [1 x %variant], ptr %varargslots33, i64 0, i64 0
store %variant %68, ptr %69, align 16
%70 = call i64 @std_io_printf(ptr %retparam32, ptr @.str.7, i64 3, ptr %varargslots33, i64 1)
%71 = load i64, ptr %.anon27, align 8
%add34 = add i64 %71, 1
store i64 %add34, ptr %.anon27, align 8
br label %loop.cond28
loop.exit35: ; preds = %loop.cond28
store ptr @.str.8, ptr %x36, align 8
%72 = call ptr @std_io_stdout()
store ptr %72, ptr %result38, align 8
%73 = call i64 @std_io_File_printn(ptr %retparam37, ptr %result38, ptr null, i64 0)
store i32 0, ptr %y, align 4
%74 = load i32, ptr %y, align 4
store i32 123, ptr %y, align 4
%75 = insertvalue %variant undef, ptr %y, 0
%76 = insertvalue %variant %75, i64 ptrtoint (ptr @"ct$int" to i64), 1
%77 = getelementptr inbounds [2 x %variant], ptr %varargslots40, i64 0, i64 0
store %variant %76, ptr %77, align 16
%78 = load i32, ptr %y, align 4
store i32 %78, ptr %taddr41, align 4
%79 = insertvalue %variant undef, ptr %taddr41, 0
%80 = insertvalue %variant %79, i64 ptrtoint (ptr @"ct$int" to i64), 1
%81 = getelementptr inbounds [2 x %variant], ptr %varargslots40, i64 0, i64 1
store %variant %80, ptr %81, align 16
%82 = call i64 @std_io_printf(ptr %retparam39, ptr @.str.9, i64 18, ptr %varargslots40, i64 2)
ret void
}