fix MathJs spelling
This commit is contained in:
parent
f5e0982a06
commit
8b21292fbe
|
@ -14,7 +14,7 @@ exception TestRescriptException
|
||||||
|
|
||||||
let callInternal = (call: CTV.functionCall): result<'b, reducerError> =>{
|
let callInternal = (call: CTV.functionCall): result<'b, reducerError> =>{
|
||||||
|
|
||||||
let callMatjJs = (call: CTV.functionCall): result<'b, reducerError> =>
|
let callMathJs = (call: CTV.functionCall): result<'b, reducerError> =>
|
||||||
switch call {
|
switch call {
|
||||||
| ("jsraise", [msg]) => Js.Exn.raiseError(CTV.show(msg)) // For Tests
|
| ("jsraise", [msg]) => Js.Exn.raiseError(CTV.show(msg)) // For Tests
|
||||||
| ("resraise", _) => raise(TestRescriptException) // For Tests
|
| ("resraise", _) => raise(TestRescriptException) // For Tests
|
||||||
|
@ -51,7 +51,7 @@ let callInternal = (call: CTV.functionCall): result<'b, reducerError> =>{
|
||||||
arrayAtIndex(aValueArray, fIndex)
|
arrayAtIndex(aValueArray, fIndex)
|
||||||
| ("$atIndex", [CTV.CtvRecord(dict), CTV.CtvArray([CTV.CtvString(sIndex)])]) => recordAtIndex(dict, sIndex)
|
| ("$atIndex", [CTV.CtvRecord(dict), CTV.CtvArray([CTV.CtvString(sIndex)])]) => recordAtIndex(dict, sIndex)
|
||||||
| ("$atIndex", [obj, index]) => (CTV.showWithType(obj) ++ "??~~~~" ++ CTV.showWithType(index))->CTV.CtvString->Ok
|
| ("$atIndex", [obj, index]) => (CTV.showWithType(obj) ++ "??~~~~" ++ CTV.showWithType(index))->CTV.CtvString->Ok
|
||||||
| call => callMatjJs(call)
|
| call => callMathJs(call)
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user