test/packages/support.rad 390 B raw
1
//! Shared package fixture.
2
/// Shared mutable data.
3
export static value: u64 = 7;
4
/// Read shared mutable data.
5
export fn read() -> u64 {
6
    memoryFence();
7
    let label = "package literal";
8
    let values = &[11 as u64, 13];
9
    return value + label.len as u64 - 15 + values[0] - 11;
10
}
11
/// Order shared-memory accesses through a compiler instruction.
12
@intrinsic export fn memoryFence();