set build_components { core init timer app/blinktree hoitaja } source ${genode_dir}/repos/base/run/platform_drv.inc append_platform_drv_build_components build $build_components create_boot_directory set config { } append config { 2022-07-20 14:30 2022-07-20 14:30 2022-07-20 14:30 } install_config $config set boot_modules { core init timer vfs.lib.so ld.lib.so libm.lib.so libc.lib.so stdcxx.lib.so hoitaja blinktree fill_randint_workloada mixed_randint_workloada } append_platform_drv_boot_modules build_boot_image $boot_modules append qemu_args "-nographic" run_genode_until forever set rounds 100 set succeeded 0 for {set r 0} {$r < $rounds} {incr r} { run_genode_until {\[init -> hoitaja -> blinktree1\] Finished\.} 300 kill_spawned [output_spawn_id] incr succeeded } puts "$succeeded of $rounds rounds succeeded."