2020-01-17 01:24:34 +01:00
|
|
|
-- SPDX-License-Identifier: CC0-1.0
|
|
|
|
|
2019-10-22 19:20:26 +02:00
|
|
|
let Genode = env:DHALL_GENODE
|
|
|
|
|
2020-01-17 19:27:04 +01:00
|
|
|
in λ(testBinary : Genode.Prelude.Map.Entry Text Text)
|
|
|
|
→ { config =
|
|
|
|
Genode.Init::{
|
|
|
|
, children =
|
|
|
|
toMap
|
|
|
|
{ solo5 =
|
|
|
|
Genode.Init.Start::{
|
|
|
|
, binary = testBinary.mapKey
|
2020-01-22 12:27:49 +01:00
|
|
|
, exitPropagate = True
|
2020-01-17 19:27:04 +01:00
|
|
|
, resources = { caps = 256, ram = Genode.units.MiB 3 }
|
|
|
|
, routes = [ Genode.ServiceRoute.parent "Timer" ]
|
|
|
|
, config =
|
|
|
|
Some
|
2020-01-23 11:39:26 +01:00
|
|
|
( Genode.Prelude.XML.element
|
|
|
|
{ name = "config"
|
|
|
|
, attributes =
|
|
|
|
[] : Genode.Prelude.Map.Type Text Text
|
|
|
|
, content =
|
|
|
|
[ Genode.Prelude.XML.element
|
|
|
|
{ name = "cmdline"
|
|
|
|
, attributes =
|
|
|
|
[] : Genode.Prelude.Map.Type Text Text
|
|
|
|
, content =
|
|
|
|
[ Genode.Prelude.XML.text
|
|
|
|
"Hello_Solo5"
|
|
|
|
]
|
|
|
|
}
|
|
|
|
]
|
|
|
|
}
|
2020-01-17 19:27:04 +01:00
|
|
|
)
|
|
|
|
}
|
2020-01-14 12:16:02 +01:00
|
|
|
}
|
2020-01-17 19:27:04 +01:00
|
|
|
}
|
|
|
|
, rom = [ testBinary ]
|
2019-10-22 19:20:26 +02:00
|
|
|
}
|