mirror of
https://github.com/c3lang/c3c.git
synced 2026-02-27 12:01:16 +00:00
Allow const access into arrays and structs.
This commit is contained in:
Christoffer Lerno
129
test/test_suite/compile_time/compile_time_access_subscript.c3t
Normal file
129
test/test_suite/compile_time/compile_time_access_subscript.c3t
Normal file
@@ -0,0 +1,129 @@
|
||||
module test;
|
||||
import std::io;
|
||||
struct Abc
|
||||
{
|
||||
float m00, m01, m10, m11;
|
||||
}
|
||||
|
||||
Abc a = flip(Abc { 1, 2, 3, 4 });
|
||||
|
||||
macro flip($init)
|
||||
{
|
||||
return Abc { $init.m01, $init.m10, $init.m11, $init.m00 };
|
||||
}
|
||||
|
||||
macro check_type($Type)
|
||||
{
|
||||
var $b = $Type[4][4] {};
|
||||
$Type z = $b[2][2];
|
||||
return z;
|
||||
}
|
||||
|
||||
enum Blurb { FOO }
|
||||
|
||||
define Bdd = distinct Abc;
|
||||
fn void main()
|
||||
{
|
||||
var $i = int[4] { 1, 2, 3, 4 };
|
||||
var $b = Abc[2] { Abc {}, Abc { 11, 22, 33, 44 }};
|
||||
var $c = variant[4] {};
|
||||
check_type(int);
|
||||
check_type(Abc);
|
||||
check_type(anyerr);
|
||||
check_type(Blurb);
|
||||
check_type(int*);
|
||||
check_type(bool);
|
||||
check_type(typeid);
|
||||
check_type(int[<3>]);
|
||||
check_type(Bdd);
|
||||
check_type(int[2]);
|
||||
check_type(int[]);
|
||||
io::printfln("%d", $b[0].m11);
|
||||
}
|
||||
|
||||
/* #expect: test.ll
|
||||
|
||||
%z = alloca i32, align 4
|
||||
%z1 = alloca %Abc, align 4
|
||||
%z2 = alloca i64, align 8
|
||||
%z3 = alloca i32, align 4
|
||||
%z4 = alloca i32*, align 8
|
||||
%z5 = alloca i8, align 1
|
||||
%z6 = alloca i64, align 8
|
||||
%z7 = alloca <3 x i32>, align 16
|
||||
%z8 = alloca %Abc, align 4
|
||||
%z9 = alloca [2 x i32], align 4
|
||||
%z10 = alloca %"int[]", align 8
|
||||
%retparam = alloca i64, align 8
|
||||
%taddr = alloca %"char[]", align 8
|
||||
%vararg = alloca %"variant[]", align 8
|
||||
%varargslots = alloca [1 x %variant], align 16
|
||||
%literal = alloca %Abc, align 4
|
||||
store i32 0, i32* %z, align 4
|
||||
%0 = getelementptr inbounds %Abc, %Abc* %z1, i32 0, i32 0
|
||||
store float 0.000000e+00, float* %0, align 4
|
||||
%1 = getelementptr inbounds %Abc, %Abc* %z1, i32 0, i32 1
|
||||
store float 0.000000e+00, float* %1, align 4
|
||||
%2 = getelementptr inbounds %Abc, %Abc* %z1, i32 0, i32 2
|
||||
store float 0.000000e+00, float* %2, align 4
|
||||
%3 = getelementptr inbounds %Abc, %Abc* %z1, i32 0, i32 3
|
||||
store float 0.000000e+00, float* %3, align 4
|
||||
store i64 0, i64* %z2, align 8
|
||||
store i32 0, i32* %z3, align 4
|
||||
store i32* null, i32** %z4, align 8
|
||||
store i8 0, i8* %z5, align 1
|
||||
store i64 0, i64* %z6, align 8
|
||||
store <3 x i32> zeroinitializer, <3 x i32>* %z7, align 16
|
||||
%4 = getelementptr inbounds %Abc, %Abc* %z8, i32 0, i32 0
|
||||
store float 0.000000e+00, float* %4, align 4
|
||||
%5 = getelementptr inbounds %Abc, %Abc* %z8, i32 0, i32 1
|
||||
store float 0.000000e+00, float* %5, align 4
|
||||
%6 = getelementptr inbounds %Abc, %Abc* %z8, i32 0, i32 2
|
||||
store float 0.000000e+00, float* %6, align 4
|
||||
%7 = getelementptr inbounds %Abc, %Abc* %z8, i32 0, i32 3
|
||||
store float 0.000000e+00, float* %7, align 4
|
||||
%8 = getelementptr inbounds [2 x i32], [2 x i32]* %z9, i64 0, i64 0
|
||||
store i32 0, i32* %8, align 4
|
||||
%9 = getelementptr inbounds [2 x i32], [2 x i32]* %z9, i64 0, i64 1
|
||||
store i32 0, i32* %9, align 4
|
||||
%10 = bitcast %"int[]"* %z10 to i8*
|
||||
call void @llvm.memset.p0i8.i64(i8* align 8 %10, i8 0, i64 16, i1 false)
|
||||
store %"char[]" { i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i32 0, i32 0), i64 2 }, %"char[]"* %taddr, align 8
|
||||
%11 = bitcast %"char[]"* %taddr to { i8*, i64 }*
|
||||
%12 = getelementptr inbounds { i8*, i64 }, { i8*, i64 }* %11, i32 0, i32 0
|
||||
%lo = load i8*, i8** %12, align 8
|
||||
%13 = getelementptr inbounds { i8*, i64 }, { i8*, i64 }* %11, i32 0, i32 1
|
||||
%hi = load i64, i64* %13, align 8
|
||||
%14 = getelementptr inbounds %Abc, %Abc* %literal, i32 0, i32 0
|
||||
store float 0.000000e+00, float* %14, align 4
|
||||
%15 = getelementptr inbounds %Abc, %Abc* %literal, i32 0, i32 1
|
||||
store float 0.000000e+00, float* %15, align 4
|
||||
%16 = getelementptr inbounds %Abc, %Abc* %literal, i32 0, i32 2
|
||||
store float 0.000000e+00, float* %16, align 4
|
||||
%17 = getelementptr inbounds %Abc, %Abc* %literal, i32 0, i32 3
|
||||
store float 0.000000e+00, float* %17, align 4
|
||||
%18 = bitcast %Abc* %literal to i8*
|
||||
%19 = insertvalue %variant undef, i8* %18, 0
|
||||
%20 = insertvalue %variant %19, i64 ptrtoint (%.introspect* @"ct$test_Abc" to i64), 1
|
||||
%21 = getelementptr inbounds [1 x %variant], [1 x %variant]* %varargslots, i64 0, i64 0
|
||||
store %variant %20, %variant* %21, align 16
|
||||
%22 = getelementptr inbounds %"variant[]", %"variant[]"* %vararg, i32 0, i32 1
|
||||
store i64 1, i64* %22, align 8
|
||||
%23 = getelementptr inbounds %"variant[]", %"variant[]"* %vararg, i32 0, i32 0
|
||||
%24 = bitcast [1 x %variant]* %varargslots to %variant*
|
||||
store %variant* %24, %variant** %23, align 8
|
||||
%25 = bitcast %"variant[]"* %vararg to { i8*, i64 }*
|
||||
%26 = getelementptr inbounds { i8*, i64 }, { i8*, i64 }* %25, i32 0, i32 0
|
||||
%lo11 = load i8*, i8** %26, align 8
|
||||
%27 = getelementptr inbounds { i8*, i64 }, { i8*, i64 }* %25, i32 0, i32 1
|
||||
%hi12 = load i64, i64* %27, align 8
|
||||
%28 = call i64 @std_io_printfln(i64* %retparam, i8* %lo, i64 %hi, i8* %lo11, i64 %hi12)
|
||||
%not_err = icmp eq i64 %28, 0
|
||||
br i1 %not_err, label %after_check, label %voiderr
|
||||
|
||||
after_check: ; preds = %entry
|
||||
br label %voiderr
|
||||
|
||||
voiderr: ; preds = %after_check, %entry
|
||||
ret void
|
||||
}
|
||||
124
test/test_suite2/compile_time/compile_time_access_subscript.c3t
Normal file
124
test/test_suite2/compile_time/compile_time_access_subscript.c3t
Normal file
@@ -0,0 +1,124 @@
|
||||
module test;
|
||||
import std::io;
|
||||
struct Abc
|
||||
{
|
||||
float m00, m01, m10, m11;
|
||||
}
|
||||
|
||||
Abc a = flip(Abc { 1, 2, 3, 4 });
|
||||
|
||||
macro flip($init)
|
||||
{
|
||||
return Abc { $init.m01, $init.m10, $init.m11, $init.m00 };
|
||||
}
|
||||
|
||||
macro check_type($Type)
|
||||
{
|
||||
var $b = $Type[4][4] {};
|
||||
$Type z = $b[2][2];
|
||||
return z;
|
||||
}
|
||||
|
||||
enum Blurb { FOO }
|
||||
|
||||
define Bdd = distinct Abc;
|
||||
fn void main()
|
||||
{
|
||||
var $i = int[4] { 1, 2, 3, 4 };
|
||||
var $b = Abc[2] { Abc {}, Abc { 11, 22, 33, 44 }};
|
||||
var $c = variant[4] {};
|
||||
check_type(int);
|
||||
check_type(Abc);
|
||||
check_type(anyerr);
|
||||
check_type(Blurb);
|
||||
check_type(int*);
|
||||
check_type(bool);
|
||||
check_type(typeid);
|
||||
check_type(int[<3>]);
|
||||
check_type(Bdd);
|
||||
check_type(int[2]);
|
||||
check_type(int[]);
|
||||
io::printfln("%d", $b[0].m11);
|
||||
}
|
||||
|
||||
/* #expect: test.ll
|
||||
|
||||
%z = alloca i32, align 4
|
||||
%z1 = alloca %Abc, align 4
|
||||
%z2 = alloca i64, align 8
|
||||
%z3 = alloca i32, align 4
|
||||
%z4 = alloca ptr, align 8
|
||||
%z5 = alloca i8, align 1
|
||||
%z6 = alloca i64, align 8
|
||||
%z7 = alloca <3 x i32>, align 16
|
||||
%z8 = alloca %Abc, align 4
|
||||
%z9 = alloca [2 x i32], align 4
|
||||
%z10 = alloca %"int[]", align 8
|
||||
%retparam = alloca i64, align 8
|
||||
%taddr = alloca %"char[]", align 8
|
||||
%vararg = alloca %"variant[]", align 8
|
||||
%varargslots = alloca [1 x %variant], align 16
|
||||
%literal = alloca %Abc, align 4
|
||||
store i32 0, ptr %z, align 4
|
||||
%0 = getelementptr inbounds %Abc, ptr %z1, i32 0, i32 0
|
||||
store float 0.000000e+00, ptr %0, align 4
|
||||
%1 = getelementptr inbounds %Abc, ptr %z1, i32 0, i32 1
|
||||
store float 0.000000e+00, ptr %1, align 4
|
||||
%2 = getelementptr inbounds %Abc, ptr %z1, i32 0, i32 2
|
||||
store float 0.000000e+00, ptr %2, align 4
|
||||
%3 = getelementptr inbounds %Abc, ptr %z1, i32 0, i32 3
|
||||
store float 0.000000e+00, ptr %3, align 4
|
||||
store i64 0, ptr %z2, align 8
|
||||
store i32 0, ptr %z3, align 4
|
||||
store ptr null, ptr %z4, align 8
|
||||
store i8 0, ptr %z5, align 1
|
||||
store i64 0, ptr %z6, align 8
|
||||
store <3 x i32> zeroinitializer, ptr %z7, align 16
|
||||
%4 = getelementptr inbounds %Abc, ptr %z8, i32 0, i32 0
|
||||
store float 0.000000e+00, ptr %4, align 4
|
||||
%5 = getelementptr inbounds %Abc, ptr %z8, i32 0, i32 1
|
||||
store float 0.000000e+00, ptr %5, align 4
|
||||
%6 = getelementptr inbounds %Abc, ptr %z8, i32 0, i32 2
|
||||
store float 0.000000e+00, ptr %6, align 4
|
||||
%7 = getelementptr inbounds %Abc, ptr %z8, i32 0, i32 3
|
||||
store float 0.000000e+00, ptr %7, align 4
|
||||
%8 = getelementptr inbounds [2 x i32], ptr %z9, i64 0, i64 0
|
||||
store i32 0, ptr %8, align 4
|
||||
%9 = getelementptr inbounds [2 x i32], ptr %z9, i64 0, i64 1
|
||||
store i32 0, ptr %9, align 4
|
||||
call void @llvm.memset.p0.i64(ptr align 8 %z10, i8 0, i64 16, i1 false)
|
||||
store %"char[]" { ptr @.str, i64 2 }, ptr %taddr, align 8
|
||||
%10 = getelementptr inbounds { ptr, i64 }, ptr %taddr, i32 0, i32 0
|
||||
%lo = load ptr, ptr %10, align 8
|
||||
%11 = getelementptr inbounds { ptr, i64 }, ptr %taddr, i32 0, i32 1
|
||||
%hi = load i64, ptr %11, align 8
|
||||
%12 = getelementptr inbounds %Abc, ptr %literal, i32 0, i32 0
|
||||
store float 0.000000e+00, ptr %12, align 4
|
||||
%13 = getelementptr inbounds %Abc, ptr %literal, i32 0, i32 1
|
||||
store float 0.000000e+00, ptr %13, align 4
|
||||
%14 = getelementptr inbounds %Abc, ptr %literal, i32 0, i32 2
|
||||
store float 0.000000e+00, ptr %14, align 4
|
||||
%15 = getelementptr inbounds %Abc, ptr %literal, i32 0, i32 3
|
||||
store float 0.000000e+00, ptr %15, align 4
|
||||
%16 = insertvalue %variant undef, ptr %literal, 0
|
||||
%17 = insertvalue %variant %16, i64 ptrtoint (ptr @"ct$test_Abc" to i64), 1
|
||||
%18 = getelementptr inbounds [1 x %variant], ptr %varargslots, i64 0, i64 0
|
||||
store %variant %17, ptr %18, align 16
|
||||
%19 = getelementptr inbounds %"variant[]", ptr %vararg, i32 0, i32 1
|
||||
store i64 1, ptr %19, align 8
|
||||
%20 = getelementptr inbounds %"variant[]", ptr %vararg, i32 0, i32 0
|
||||
store ptr %varargslots, ptr %20, align 8
|
||||
%21 = getelementptr inbounds { ptr, i64 }, ptr %vararg, i32 0, i32 0
|
||||
%lo11 = load ptr, ptr %21, align 8
|
||||
%22 = getelementptr inbounds { ptr, i64 }, ptr %vararg, i32 0, i32 1
|
||||
%hi12 = load i64, ptr %22, align 8
|
||||
%23 = call i64 @std_io_printfln(ptr %retparam, ptr %lo, i64 %hi, ptr %lo11, i64 %hi12)
|
||||
%not_err = icmp eq i64 %23, 0
|
||||
br i1 %not_err, label %after_check, label %voiderr
|
||||
|
||||
after_check: ; preds = %entry
|
||||
br label %voiderr
|
||||
|
||||
voiderr: ; preds = %after_check, %entry
|
||||
ret void
|
||||
}
|
||||
Reference in New Issue
Block a user