module tests pass
This commit is contained in:
parent
69bab17331
commit
0704c8d9f5
|
@ -2,6 +2,6 @@ open Jest
|
|||
open Reducer_TestHelpers
|
||||
|
||||
describe("Math Library", () => {
|
||||
testEvalToBe("Math.e", "")
|
||||
testEvalToBe("Math.pi", "")
|
||||
testEvalToBe("Math.e", "Ok(2.718281828459045)")
|
||||
testEvalToBe("Math.pi", "Ok(3.141592653589793)")
|
||||
})
|
||||
|
|
|
@ -256,6 +256,7 @@ let callInternal = (call: functionCall, environment, reducer: ExpressionT.reduce
|
|||
|
||||
switch call {
|
||||
| ("$_atIndex_$", [EvArray(aValueArray), EvNumber(fIndex)]) => arrayAtIndex(aValueArray, fIndex)
|
||||
| ("$_atIndex_$", [EvModule(dict), EvString(sIndex)]) => recordAtIndex(dict, sIndex)
|
||||
| ("$_atIndex_$", [EvRecord(dict), EvString(sIndex)]) => recordAtIndex(dict, sIndex)
|
||||
| ("$_constructArray_$", [EvArray(aValueArray)]) => EvArray(aValueArray)->Ok
|
||||
| ("$_constructRecord_$", [EvArray(arrayOfPairs)]) => constructRecord(arrayOfPairs)
|
||||
|
|
Loading…
Reference in New Issue
Block a user