juvix/tests/VampIR/positive/Core/test015.jvc

-- tail recursion

def sum' : Int -> Int -> Int := \(x : Int) \(acc : Int) if x = 0 then acc else sum' (x - 1) (x + acc);
def sum : Int -> Int := \(x : Int) sum' x 0;

sum
Normalization by Evaluation (#2038) * Closes #2032. * Adds the `juvix dev core normalize` command. * Adds the `:n` command in JuvixCore REPL. * Adds the `--normalize` flag to `juvix dev core read` and `juvix dev core from-concrete`. * Adds `pipeline-normalize` which denotes pipeline steps necessary before normalization. * Adds normalization tests in `tests/VampIR/positive/Core`. 2023-05-15 19:01:40 +03:00			`-- tail recursion`

			`def sum' : Int -> Int -> Int := \(x : Int) \(acc : Int) if x = 0 then acc else sum' (x - 1) (x + acc);`
			`def sum : Int -> Int := \(x : Int) sum' x 0;`

			`sum`