github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-22 06:11:49 +03:00
Code Issues Projects Releases Wiki Activity

📝 uninitializedAddress.

Browse Source
This commit is contained in:
Rob Rix 2017-12-21 10:18:50 -05:00
parent 475a7d79da
commit f63d73e843
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Control/Monad/Effect/Address.hs
View File

@ -62,5 +62,6 @@ instance (Alternative m, Monad m) => MonadAddress Monovariant m where
alloc = pure . Address . Monovariant alloc = pure . Address . Monovariant
-- | Fail with a message denoting an uninitialized address (i.e. one which was 'alloc'ated, but never 'assign'ed a value before being 'deref'erenced).
uninitializedAddress :: MonadFail m => m a uninitializedAddress :: MonadFail m => m a
uninitializedAddress = Control.Monad.Fail.fail "uninitialized address" uninitializedAddress = Control.Monad.Fail.fail "uninitialized address"