2022-04-17 17:24:39 +00:00
|
|
|
open Jest
|
|
|
|
|
open Reducer_TestHelpers
|
|
|
|
|
|
2022-04-21 17:48:07 +00:00
|
|
|
describe("Eval with Bindings", () => {
|
2022-06-16 12:08:59 +00:00
|
|
|
testEvalBindingsToBe("x", list{("x", ExternalExpressionValue.EvNumber(1.))}, "Ok(1)")
|
|
|
|
|
testEvalBindingsToBe("x+1", list{("x", ExternalExpressionValue.EvNumber(1.))}, "Ok(2)")
|
2022-05-29 15:00:16 +00:00
|
|
|
testParseToBe("y = x+1; y", "Ok({(:$_let_$ :y {(:add :x 1)}); :y})")
|
2022-06-16 12:08:59 +00:00
|
|
|
testEvalBindingsToBe("y = x+1; y", list{("x", ExternalExpressionValue.EvNumber(1.))}, "Ok(2)")
|
|
|
|
|
testEvalBindingsToBe(
|
|
|
|
|
"y = x+1",
|
|
|
|
|
list{("x", ExternalExpressionValue.EvNumber(1.))},
|
|
|
|
|
"Ok(@{x: 1,y: 2})",
|
|
|
|
|
)
|
2022-04-21 17:28:29 +00:00
|
|
|
})
|
