Contents

{-# LANGUAGE OverloadedStrings #-}

module Forth
  ( ForthError(..)
  , ForthState
  , evalText
  , toList
  , empty
  ) where

import Data.Text (Text)

data ForthError
     = DivisionByZero
     | StackUnderflow
     | InvalidWord
     | UnknownWord Text
     deriving (Show, Eq)

empty :: ForthState
empty = undefined

evalText :: Text -> ForthState -> Either ForthError ForthState
evalText = undefined

toList :: ForthState -> [Int]
toList = undefined

Version data entries

1 entries across 1 versions & 1 rubygems

Version	Path
trackler-2.0.0.3	tracks/haskell/exercises/forth/src/Forth.hs