(bind-func fleet_print_unit_state
(lambda (state:json_t*)
(printf " name: %s\n\n" (json_string_value (json_object_get state "name")))
(printf " machineID: %s\n" (json_string_value (json_object_get state "machineID")))
(printf " systemdActiveState: %s\n" (json_string_value (json_object_get state "systemdActiveState")))
(printf " systemdLoadState: %s\n" (json_string_value (json_object_get state "systemdLoadState")))
(printf " systemdSubState: %s\n" (json_string_value (json_object_get state "systemdSubState")))
(println)))