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

Refine unit requirement

This commit is contained in:
Niels G. W. Serup 2024-10-06 13:44:19 +02:00
parent 381ecd5f03
commit 1fce00e531
No known key found for this signature in database
GPG Key ID: 38EEEBCE67324F19
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
byg/src/DependencyGenerator.hs
View File

@ -104,7 +104,7 @@ runFunction f input = genDependency (makeDependency input (Function f))
runFunctionIO :: IsFunctionIO f a b => f -> Token a -> DepGenM' b runFunctionIO :: IsFunctionIO f a b => f -> Token a -> DepGenM' b
runFunctionIO f input = genDependency (makeDependency input (FunctionIO f)) runFunctionIO f input = genDependency (makeDependency input (FunctionIO f))
runFunctionIO_ :: IsFunctionIO f a b => f -> Token a -> DepGenM () runFunctionIO_ :: IsFunctionIO f a () => f -> Token a -> DepGenM ()
runFunctionIO_ f input = tellDep $ makeDependency input (FunctionIO f) NoToken runFunctionIO_ f input = tellDep $ makeDependency input (FunctionIO f) NoToken
class TokenableTo t s | s -> t where class TokenableTo t s | s -> t where