Moved to app/Main, scheduler helper methods moved to unfinished test

This commit is contained in:
Guntis Smaukstelis
2023-05-25 13:51:45 +03:00
parent d651e3f3bd
commit 1abb12d92a
5 changed files with 30 additions and 24 deletions
+22
View File
@@ -0,0 +1,22 @@
package app
import cats.effect._
import cats.implicits.catsSyntaxTuple2Parallel
import db.{DBService, DataService}
import fetch.{FetchService, FileFetchScheduler}
import server.Server
object Main extends IOApp {
def run(args: List[String]): IO[ExitCode] = {
for {
dbService <- DBService.of
dataService <- DataService.of(dbService)
fetch <- FetchService.of
fileFetchScheduler <- FileFetchScheduler.of(dataService, fetch)
schedulerTask = fileFetchScheduler.run.compile.drain
server <- Server.of(dataService, fetch)
serverTask = server.run
exitCode <- (serverTask, schedulerTask).parMapN((_, _) => ExitCode.Success)
} yield exitCode
}
}