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

We can use fromMaybe now.

Browse Source
This commit is contained in:
Rob Rix 2018-05-30 13:53:55 -04:00
parent 152ba7f549
commit 36dabb27e6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Language/PHP/Syntax.hs
View File

@ -68,7 +68,7 @@ include pathTerm f = do
name <- subtermValue pathTerm >>= asString
path <- resolvePHPName name
traceResolve name path
(importedEnv, v) <- isolate (f path) >>= maybeM (pure (emptyEnv, unit))
(importedEnv, v) <- fromMaybe (emptyEnv, unit) <$> isolate (f path)
bindAll importedEnv
pure (Rval v)