// Tests for ARM64 backend large struct returns (> 16 bytes)
// This tests the fix from commit 9919ddeb5 which handles:
// - Saving/restoring x8 (indirect return pointer) for large struct returns
// - Proper stack frame layout with callee-saved registers
// - Large struct parameter copying
// - String operations (string is 24 bytes: ptr + len + is_lit)

fn print_str(s string) {
    C.write(1, s.str, s.len)
    C.write(1, c'\n', 1)
}

// ===================== FUNCTIONS RETURNING STRINGS =====================

// Test 1: Return a string literal (24 bytes indirect return)
fn get_hello() string {
    return 'hello'
}

// Test 2: Return concatenated string
fn get_greeting(name string) string {
    return 'Hello, ' + name
}

// Test 3: Nested string returns
fn get_formal_greeting(name string) string {
    greeting := get_greeting(name)
    return greeting + '!'
}

// Test 4: Multiple string concatenations
fn concat_three(a string, b string, c string) string {
    return a + b + c
}

// Test 5: String function calling another string function
fn get_full_message() string {
    greeting := get_hello()
    suffix := ' world'
    return greeting + suffix
}

// Test 6: Chain of string returns
fn chain_a() string {
    return 'A'
}

fn chain_b() string {
    return chain_a() + 'B'
}

fn chain_c() string {
    return chain_b() + 'C'
}

// Test 7: Conditional string return
fn conditional_string(flag bool) string {
    if flag {
        return 'true_case'
    }
    return 'false_case'
}

// ===================== MAIN =====================

fn main() {
    print_str('--- String Return Tests (Large Struct > 16 bytes) ---')

    // Test 1: Basic string literal return
    s1 := get_hello()
    print_str(s1)

    // Test 2: String concatenation return
    s2 := get_greeting('Alice')
    print_str(s2)

    // Test 3: Nested string function calls
    s3 := get_formal_greeting('Bob')
    print_str(s3)

    // Test 4: Multiple parameters concatenation
    s4 := concat_three('One', '-Two-', 'Three')
    print_str(s4)

    // Test 5: Function calling function returning strings
    s5 := get_full_message()
    print_str(s5)

    // Test 6: Chain of string returns
    s6 := chain_c()
    print_str(s6)

    // Test 7: Conditional string returns
    s7a := conditional_string(true)
    s7b := conditional_string(false)
    print_str(s7a)
    print_str(s7b)

    // Test 8: Direct string operations
    direct := 'Direct' + ' ' + 'Test'
    print_str(direct)

    // Test 9: Interpolation with string return
    name := 'Claude'
    interp := 'Name: ${name}'
    print_str(interp)

    // Test 10: Chained string concat expression
    chained := 'A' + 'B' + 'C' + 'D' + 'E'
    print_str(chained)

    print_str('--- All tests completed ---')
}