{-# LANGUAGE CPP #-}

module Calculator.Prim.Result
    ( Result (..)
    ) where

--------------------------------------------------------------------------------

import           Calculator.Prim.Bindings (Bindings)

--------------------------------------------------------------------------------

data Result = NewBindings Bindings
            | Text String
            | Error String
            | Value Double
#ifdef PLOT
            | Action (IO ())
#endif

--------------------------------------------------------------------------------