Commit 00a56b7c authored by pm3g19's avatar pm3g19
Browse files

Neatened up function declarations

parent 1cbf18b2
......@@ -35,7 +35,7 @@ eval env expr = let (eval', evalFull') = (eval env, evalFull env) in case expr o
RecordSelect -> debug (show expr) $ Record filteredList
where
(Record recordData: indexes) = map eval' args
(Record recordData: indexes) = map eval' args --
indexesRaw = map (\(Int i) -> i - 1) indexes
filteredList = map (recordData!!) indexesRaw
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment