Use Value for evaluating functions

This commit is contained in:
Niels G. W. Serup 2024-09-24 21:03:54 +02:00
parent e7e767c007
commit 9376ede653
No known key found for this signature in database
GPG Key ID: 38EEEBCE67324F19
2 changed files with 4 additions and 4 deletions

View File

@ -2,7 +2,7 @@ module Evaluation.Function
( evalFunction
) where
import Types (Function(..))
import Types (Function(..), Value(..))
evalFunction :: Function -> a -> b
evalFunction :: Function -> Value -> Value
evalFunction = undefined

View File

@ -2,7 +2,7 @@ module Evaluation.FunctionIO
( evalFunctionIO
) where
import Types (FunctionIO(..))
import Types (FunctionIO(..), Value(..))
evalFunctionIO :: FunctionIO -> a -> b
evalFunctionIO :: FunctionIO -> Value -> IO Value
evalFunctionIO = undefined