From 0d52bcf663ead766ae83c8f30f90beaea5790789 Mon Sep 17 00:00:00 2001 From: Mirek Kratochvil Date: Sun, 26 Feb 2023 18:10:10 +0100 Subject: semicolon colons semi --- app/Heap.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'app/Heap.hs') diff --git a/app/Heap.hs b/app/Heap.hs index 0dc79e6..4108089 100644 --- a/app/Heap.hs +++ b/app/Heap.hs @@ -30,8 +30,7 @@ deref :: Int -> PrlgEnv Dereferenced deref = uses (cur . heap) . flip deref' writeHeap :: Int -> Datum -> PrlgEnv () -writeHeap a v = - cur . heap %= (\(Heap nxt m) -> Heap nxt $ M.insert a v m) +writeHeap a v = cur . heap %= (\(Heap nxt m) -> Heap nxt $ M.insert a v m) allocHeap :: Int -> PrlgEnv Int allocHeap n = do -- cgit v1.2.3