Searched refs:envCurrentPath (Results 1 – 8 of 8) sorted by relevance
32 getCurrentPath = fromMaybe __IMPOSSIBLE__ <$> asksTC envCurrentPath
137 currentFile <- asksTC envCurrentPath
2775 , envCurrentPath :: Maybe AbsolutePath function2913 , envCurrentPath = Nothing function3008 eCurrentPath f e = f (envCurrentPath e) <&> \ x -> e { envCurrentPath = x }
175 localTC (\ e -> e { envCurrentPath = mpath }) cont
907 localTC (\e -> e { envCurrentPath = Just (srcFilePath file) }) $ do
945 localTC (\ e -> e { envCurrentPath = mfile }) m
60 currentFile <- fromMaybe __IMPOSSIBLE__ <$> asksTC envCurrentPath
295 caseMaybeM (asksTC envCurrentPath) (return id) $ \ f -> do