cl: isVargs support defer/go

cl/_testlibc/defer/in.go

@@ -0,0 +1,16 @@
+package main
+
+import "github.com/goplus/llgo/c"
+
+func f(s string) bool {
+	return len(s) > 2
+}
+
+func main() {
+	if s := "hello"; f(s) {
+		defer c.Printf(c.Str("%s\n"), c.AllocaCStr(s))
+	} else {
+		defer c.Printf(c.Str("world\n"))
+	}
+	defer c.Printf(c.Str("bye\n"))
+}

cl/_testlibc/defer/out.ll

@@ -0,0 +1,148 @@
+; ModuleID = 'main'
+source_filename = "main"
+
+%"github.com/goplus/llgo/internal/runtime.String" = type { ptr, i64 }
+%"github.com/goplus/llgo/internal/runtime.Defer" = type { i64, ptr, i64 }
+
+@"main.init$guard" = global ptr null
+@__llgo_argc = global ptr null
+@__llgo_argv = global ptr null
+@0 = private unnamed_addr constant [6 x i8] c"hello\00", align 1
+@1 = private unnamed_addr constant [4 x i8] c"%s\0A\00", align 1
+@2 = private unnamed_addr constant [6 x i8] c"hello\00", align 1
+@__llgo_defer = linkonce global ptr null
+@3 = private unnamed_addr constant [7 x i8] c"world\0A\00", align 1
+@4 = private unnamed_addr constant [5 x i8] c"bye\0A\00", align 1
+
+define i1 @main.f(%"github.com/goplus/llgo/internal/runtime.String" %0) {
+_llgo_0:
+  %1 = extractvalue %"github.com/goplus/llgo/internal/runtime.String" %0, 1
+  %2 = icmp sgt i64 %1, 2
+  ret i1 %2
+}
+
+define void @main.init() {
+_llgo_0:
+  %0 = load i1, ptr @"main.init$guard", align 1
+  br i1 %0, label %_llgo_2, label %_llgo_1
+
+_llgo_1:                                          ; preds = %_llgo_0
+  store i1 true, ptr @"main.init$guard", align 1
+  call void @"main.init$after"()
+  br label %_llgo_2
+
+_llgo_2:                                          ; preds = %_llgo_1, %_llgo_0
+  ret void
+}
+
+define i32 @main(i32 %0, ptr %1) {
+_llgo_0:
+  store i32 %0, ptr @__llgo_argc, align 4
+  store ptr %1, ptr @__llgo_argv, align 8
+  call void @"github.com/goplus/llgo/internal/runtime.init"()
+  call void @main.init()
+  %2 = alloca %"github.com/goplus/llgo/internal/runtime.String", align 8
+  %3 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.String", ptr %2, i32 0, i32 0
+  store ptr @0, ptr %3, align 8
+  %4 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.String", ptr %2, i32 0, i32 1
+  store i64 5, ptr %4, align 4
+  %5 = load %"github.com/goplus/llgo/internal/runtime.String", ptr %2, align 8
+  %6 = call i1 @main.f(%"github.com/goplus/llgo/internal/runtime.String" %5)
+  %7 = load ptr, ptr @__llgo_defer, align 8
+  %8 = call ptr @pthread_getspecific(ptr %7)
+  %9 = alloca i8, i64 24, align 1
+  %10 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.Defer", ptr %9, i32 0, i32 0
+  store i64 0, ptr %10, align 4
+  %11 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.Defer", ptr %9, i32 0, i32 1
+  store ptr %8, ptr %11, align 8
+  %12 = call i32 @pthread_setspecific(ptr %7, ptr %9)
+  %13 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.Defer", ptr %9, i32 0, i32 0
+  %14 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.Defer", ptr %9, i32 0, i32 2
+  br i1 %6, label %_llgo_1, label %_llgo_3
+
+_llgo_1:                                          ; preds = %_llgo_0
+  %15 = alloca %"github.com/goplus/llgo/internal/runtime.String", align 8
+  %16 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.String", ptr %15, i32 0, i32 0
+  store ptr @2, ptr %16, align 8
+  %17 = getelementptr inbounds %"github.com/goplus/llgo/internal/runtime.String", ptr %15, i32 0, i32 1
+  store i64 5, ptr %17, align 4
+  %18 = load %"github.com/goplus/llgo/internal/runtime.String", ptr %15, align 8
+  %19 = extractvalue %"github.com/goplus/llgo/internal/runtime.String" %18, 1
+  %20 = add i64 %19, 1
+  %21 = alloca i8, i64 %20, align 1
+  %22 = call ptr @"github.com/goplus/llgo/internal/runtime.CStrCopy"(ptr %21, %"github.com/goplus/llgo/internal/runtime.String" %18)
+  %23 = load i64, ptr %13, align 4
+  %24 = or i64 %23, 1
+  store i64 %24, ptr %13, align 4
+  br label %_llgo_2
+
+_llgo_2:                                          ; preds = %_llgo_3, %_llgo_1
+  store i64 0, ptr %14, align 4
+  br label %_llgo_5
+
+_llgo_3:                                          ; preds = %_llgo_0
+  %25 = load i64, ptr %13, align 4
+  %26 = or i64 %25, 2
+  store i64 %26, ptr %13, align 4
+  br label %_llgo_2
+
+_llgo_4:                                          ; No predecessors!
+  ret i32 0
+
+_llgo_5:                                          ; preds = %_llgo_2
+  %27 = load i64, ptr %13, align 4
+  %28 = call i32 (ptr, ...) @printf(ptr @4)
+  %29 = and i64 %27, 2
+  %30 = icmp ne i64 %29, 0
+  br i1 %30, label %_llgo_7, label %_llgo_8
+
+_llgo_6:                                          ; preds = %_llgo_10
+  ret i32 0
+
+_llgo_7:                                          ; preds = %_llgo_5
+  %31 = call i32 (ptr, ...) @printf(ptr @3)
+  br label %_llgo_8
+
+_llgo_8:                                          ; preds = %_llgo_7, %_llgo_5
+  %32 = and i64 %27, 1
+  %33 = icmp ne i64 %32, 0
+  br i1 %33, label %_llgo_9, label %_llgo_10
+
+_llgo_9:                                          ; preds = %_llgo_8
+  %34 = call i32 (ptr, ...) @printf(ptr @1, ptr %22)
+  br label %_llgo_10
+
+_llgo_10:                                         ; preds = %_llgo_9, %_llgo_8
+  %35 = load %"github.com/goplus/llgo/internal/runtime.Defer", ptr %9, align 8
+  %36 = extractvalue %"github.com/goplus/llgo/internal/runtime.Defer" %35, 2
+  %37 = call i32 @pthread_setspecific(ptr %7, i64 %36)
+  %38 = load i64, ptr %14, align 4
+  switch i64 %38, label %_llgo_6 [
+  ]
+}
+
+declare void @"github.com/goplus/llgo/internal/runtime.init"()
+
+declare ptr @"github.com/goplus/llgo/internal/runtime.CStrCopy"(ptr, %"github.com/goplus/llgo/internal/runtime.String")
+
+declare i32 @printf(ptr, ...)
+
+declare ptr @pthread_getspecific(i32)
+
+declare i32 @pthread_setspecific(i32, ptr)
+
+define void @"main.init$after"() {
+_llgo_0:
+  %0 = load ptr, ptr @__llgo_defer, align 8
+  %1 = icmp eq ptr %0, null
+  br i1 %1, label %_llgo_1, label %_llgo_2
+
+_llgo_1:                                          ; preds = %_llgo_0
+  %2 = call i32 @pthread_key_create(ptr @__llgo_defer, ptr null)
+  br label %_llgo_2
+
+_llgo_2:                                          ; preds = %_llgo_1, %_llgo_0
+  ret void
+}
+
+declare i32 @pthread_key_create(ptr, ptr)