Skip to content
Snippets Groups Projects
Commit 5bb6a10d authored by Jens Nolte's avatar Jens Nolte
Browse files

Swap newObservableStub arguments


Co-authored-by: default avatarJan Beinke <git@janbeinke.com>
parent e8839702
No related branches found
No related tags found
No related merge requests found
...@@ -8,11 +8,11 @@ import Quasar.Observable ...@@ -8,11 +8,11 @@ import Quasar.Observable
import Quasar.Prelude import Quasar.Prelude
newObservableStub newObservableStub
:: forall v. Binary v => :: forall v. Binary v
(forall m. MonadIO m => m (Stream Void v)) => (forall m. MonadIO m => m (Awaitable v))
-> (forall m. MonadIO m => m (Awaitable v)) -> (forall m. MonadIO m => m (Stream Void v))
-> IO (Observable v) -> IO (Observable v)
newObservableStub startObserveRequest startRetrieveRequest = pure uncachedObservable -- TODO cache newObservableStub startRetrieveRequest startObserveRequest = pure uncachedObservable -- TODO cache
where where
uncachedObservable :: Observable v uncachedObservable :: Observable v
uncachedObservable = fnObservable observeFn retrieveFn uncachedObservable = fnObservable observeFn retrieveFn
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment