2020-01-23 11:39:02 +01:00
|
|
|
-- SPDX-License-Identifier: CC0-1.0
|
|
|
|
|
2020-04-13 20:26:01 +02:00
|
|
|
let Test = ./test.dhall ? env:DHALL_GENODE_TEST
|
|
|
|
|
|
|
|
let Genode = Test.Genode
|
2020-01-23 11:39:02 +01:00
|
|
|
|
2020-02-21 22:55:50 +01:00
|
|
|
let Child = Genode.Init.Child
|
|
|
|
|
2020-04-13 20:26:01 +02:00
|
|
|
let init =
|
|
|
|
Genode.Init::{
|
2020-03-18 12:57:00 +01:00
|
|
|
, children = toMap
|
|
|
|
{ test-rtc =
|
|
|
|
Child.flat
|
|
|
|
Child.Attributes::{
|
|
|
|
, binary = "test-rtc"
|
|
|
|
, exitPropagate = True
|
|
|
|
, routes =
|
|
|
|
[ Genode.Init.ServiceRoute.parent "Timer"
|
|
|
|
, Genode.Init.ServiceRoute.child "Rtc" "rtc_drv"
|
|
|
|
]
|
|
|
|
}
|
|
|
|
, rtc_drv =
|
|
|
|
Child.flat
|
|
|
|
Child.Attributes::{
|
|
|
|
, binary = "rtc_drv"
|
|
|
|
, provides = [ "Rtc" ]
|
|
|
|
, routes = [ Genode.Init.ServiceRoute.parent "IO_PORT" ]
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2020-04-13 20:26:01 +02:00
|
|
|
|
|
|
|
in Test::{ children = Test.initToChildren init }
|