github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-28 10:15:55 +03:00
Code Issues Projects Releases Wiki Activity

stray whitespace

Browse Source
This commit is contained in:
Patrick Thomson 2018-03-23 14:39:57 -04:00
parent de15e436d0
commit 4ab2d17b5e
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Control/Abstract/Evaluator.hs
View File

@ -117,7 +117,6 @@ modifyHeap f = do
s <- getHeap
putHeap $! f s
-- | Look up the cell for the given 'Address' in the 'Heap'.
lookupHeap :: (MonadHeap value m, Ord (LocationFor value)) => Address (LocationFor value) value -> m (Maybe (CellFor value))
lookupHeap = flip fmap getHeap . heapLookup