Packages

midas

0.2.0
3.0.0 2.1.0 2.0.0 1.7.0 1.6.0 1.5.0 1.4.2 1.4.1 1.4.0 1.3.1 1.3.0 1.2.0 1.1.0 1.0.0 0.4.7 0.4.6 0.4.5 0.4.4 0.4.3 0.4.2 0.4.1 0.4.0 0.3.0 0.2.0 0.1.0

Task definition and runners for Gleam

HexDocs

Current section

Files

Jump to
Readme
25 Versions
1 Dependency
Dependants
Files
Activity
midas src magpie supervisor.gleam
Raw

src/magpie/supervisor.gleam 

import process/process

import process/process.{From, Pid, BarePid, ExitReason, Normal, Kill, Infinity, Milliseconds, TrapExit}

import process/supervisor/rest_for_one

import net/http

import magpie/server_supervisor

import magpie/governor_supervisor



fn init(handler, port) {

  let Ok(listen_socket) = http.listen(port)



  rest_for_one.Two(

    fn() { server_supervisor.spawn_link(handler, listen_socket) },

    fn(server_sup) { governor_supervisor.spawn_link(server_sup) },

  )

}



pub fn spawn_link(handler, port: Int) -> Pid(rest_for_one.Messages(a)) {

  rest_for_one.spawn_link(fn() { init(handler, port) })

}