aboutsummaryrefslogtreecommitdiff
path: root/src/Fun/Tree.hs
diff options
context:
space:
mode:
authorMarvin Borner2022-03-06 00:39:46 +0100
committerMarvin Borner2022-03-06 00:39:46 +0100
commita570892ef603aebba28ce9617fcd928df2d7761c (patch)
tree05d0f7331ad8f6accc5f72efc92587792550212e /src/Fun/Tree.hs
parent13b00d16f1bec54002897b27fa1b78f4da281160 (diff)
Assembly required
Diffstat (limited to 'src/Fun/Tree.hs')
-rw-r--r--src/Fun/Tree.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Fun/Tree.hs b/src/Fun/Tree.hs
index 7b87853..943ecc3 100644
--- a/src/Fun/Tree.hs
+++ b/src/Fun/Tree.hs
@@ -59,6 +59,7 @@ data FunctionArgument = FunctionName String | FunctionInfixName String | Functio
----
-- TODO: This can be optimized
+-- TODO: Respect visibility
getFunction :: Tree -> String -> FunctionSignature -> Maybe Block
getFunction (Tree ps) f sig =
let fromProgram (Program bs) =