85 lines
1.6 KiB
Plaintext
85 lines
1.6 KiB
Plaintext
program stability
|
|
struct Pair
|
|
field left: i32
|
|
field right: i32
|
|
fn sum_pair(pair: Pair) -> i32
|
|
binary +
|
|
field-access left
|
|
var pair
|
|
field-access right
|
|
var pair
|
|
fn choose(value: i32) -> i32
|
|
if
|
|
binary <
|
|
var value
|
|
int 10
|
|
if
|
|
binary <
|
|
var value
|
|
int 5
|
|
binary +
|
|
var value
|
|
int 1
|
|
binary +
|
|
var value
|
|
int 2
|
|
unsafe
|
|
if
|
|
binary <
|
|
var value
|
|
int 20
|
|
binary +
|
|
var value
|
|
int 3
|
|
binary +
|
|
var value
|
|
int 4
|
|
fn loop_sum() -> i32
|
|
local var i: i32
|
|
int 0
|
|
local var total: i32
|
|
int 0
|
|
while
|
|
binary <
|
|
var i
|
|
int 3
|
|
set total
|
|
unsafe
|
|
if
|
|
binary <
|
|
var i
|
|
int 2
|
|
binary +
|
|
var total
|
|
var i
|
|
binary +
|
|
var total
|
|
int 1
|
|
set i
|
|
binary +
|
|
var i
|
|
int 1
|
|
var total
|
|
fn accept_many(a: i32, b: i32, c: i32, d: i32, e: i32, f: i32, g: i32, h: i32, i: i32, j: i32) -> i32
|
|
binary +
|
|
var a
|
|
var j
|
|
fn long_inline_call() -> i32
|
|
call accept_many
|
|
int 100000001
|
|
int 100000002
|
|
int 100000003
|
|
int 100000004
|
|
int 100000005
|
|
int 100000006
|
|
int 100000007
|
|
int 100000008
|
|
int 100000009
|
|
int 100000010
|
|
test "comments stay"
|
|
local let value: i32
|
|
int 42
|
|
binary =
|
|
var value
|
|
int 42
|