ngws/mad
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use Value for evaluating functions

Browse Source
This commit is contained in:
Niels G. W. Serup
2024-09-24 21:03:54 +02:00
parent e7e767c007
commit 9376ede653
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
byg/src/Evaluation/Function.hs
View File

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

4
byg/src/Evaluation/FunctionIO.hs
View File

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