let Genode = env:DHALL_GENODE

let Init = Genode.Init

let Child = Init.Child

let init =
      Init::{
      , children = toMap
          { solo5 =
              Child.flat
                Child.Attributes::{
                , binary = "solo5-test_blk"
                , exitPropagate = True
                , resources = Init.Resources::{
                  , caps = 256
                  , ram = Genode.units.MiB 3
                  }
                , routes =
                  [ Init.ServiceRoute.parent "Timer"
                  , Init.ServiceRoute.child "Block" "block"
                  ]
                }
          , block =
              Child.flat
                Child.Attributes::{
                , binary = "ram_block"
                , provides = [ "Block" ]
                , resources = Init.Resources::{ ram = Genode.units.MiB 9 }
                , config = Init.Config::{
                  , attributes = toMap { size = "8M", block_size = "4096" }
                  }
                }
          }
      }

in  Init.toChild init Init.Attributes.default