module Calculator.Prim.Result ( Result (..) ) where -------------------------------------------------------------------------------- import Calculator.Prim.Bindings (Bindings) -------------------------------------------------------------------------------- data Result = NewBindings Bindings | Text String | Error String | Value Double | Action (IO ()) --------------------------------------------------------------------------------