2022-06-16 12:08:59 +00:00
|
|
|
// Reducer_Helpers
|
2022-06-10 12:38:31 +00:00
|
|
|
module ErrorValue = Reducer_ErrorValue
|
2022-06-16 12:08:59 +00:00
|
|
|
module InternalExpressionValue = ReducerInterface.InternalExpressionValue
|
2022-06-10 12:38:31 +00:00
|
|
|
|
2022-06-24 10:15:38 +00:00
|
|
|
let removeDefaultsInternal = (iev: InternalExpressionValue.t) => {
|
2022-09-17 22:19:08 +00:00
|
|
|
iev // TODO - cleanup, noop
|
2022-06-16 12:08:59 +00:00
|
|
|
}
|
2022-06-10 12:38:31 +00:00
|
|
|
|
2022-06-16 12:08:59 +00:00
|
|
|
let rRemoveDefaultsInternal = r => Belt.Result.map(r, removeDefaultsInternal)
|