This commit is contained in:
Umur Ozkul 2022-04-14 17:00:12 +02:00
parent 9b4f397859
commit fb63d44ab9

View File

@ -156,7 +156,7 @@ let reduceExpression = (expression: t, bindings: T.bindings): result<expressionV
)
racc->Result.flatMap(acc => acc->reduceValueList)
}
| _ => RETodo("Error: Bindings cannot be reduced to values")->Error
| EBindings(_bindings) => RETodo("Error: Bindings cannot be reduced to values")->Error
}
let rExpandedExpression: result<t, 'e> = expression->seekMacros(bindings)