Searched refs:eActiveBackendName (Results 1 – 4 of 4) sorted by relevance
236 locallyTC eActiveBackendName (const $ Just $ backendName backend) $ do
265 caseMaybeM (viewTC eActiveBackendName) __IMPOSSIBLE__ $ \ bname ->
151 locallyTC eActiveBackendName (const $ Just b) $
3135 eActiveBackendName :: Lens' (Maybe BackendName) TCEnv3136 eActiveBackendName f e = f (envActiveBackendName e) <&> \ x -> e { envActiveBackendName = x } function