This commit is contained in:
Umur Ozkul 2022-05-28 16:02:16 +02:00
parent ce5f12360a
commit 217a783d0a

View File

@ -24,14 +24,11 @@ let callReducer = (
reducer: reducerFn, reducer: reducerFn,
): result<expressionValue, errorValue> => { ): result<expressionValue, errorValue> => {
switch expressionWithContext { switch expressionWithContext {
| ExpressionNoContext( | ExpressionNoContext(expr) =>
expr, // Js.log(`callReducer: bindings ${Bindings.toString(bindings)} expr ${ExpressionT.toString(expr)}`)
) => // Js.log(`callReducer: bindings ${Bindings.toString(bindings)} expr ${ExpressionT.toString(expr)}`)
reducer(expr, bindings, environment) reducer(expr, bindings, environment)
| ExpressionWithContext( | ExpressionWithContext(expr, context) =>
expr, // Js.log(`callReducer: context ${Bindings.toString(context)} expr ${ExpressionT.toString(expr)}`)
context,
) => // Js.log(`callReducer: context ${Bindings.toString(context)} expr ${ExpressionT.toString(expr)}`)
reducer(expr, context, environment) reducer(expr, context, environment)
} }
} }