sigil/tests/test.dhall

33 lines
919 B
Plaintext

let Sigil = env:DHALL_SIGIL
let Prelude = Sigil.Prelude
let Init = Sigil.Init
in { Genode
, Type =
{ children : Prelude.Map.Type Text Init.Child.Type
, rom : Sigil.BootModules.Type
}
, default.rom = [] : Sigil.BootModules.Type
, initToChildren =
λ(init : Init.Type) →
toMap
{ init =
Init.toChild
init
Init.Attributes::{
, routes =
[ Init.ServiceRoute.parentLabel
"LOG"
(Some "SOTEST")
(Some "unlabeled")
, Init.ServiceRoute.parent "IO_MEM"
, Init.ServiceRoute.parent "IO_PORT"
, Init.ServiceRoute.parent "IRQ"
, Init.ServiceRoute.parent "VM"
]
}
}
}