+
+ INFO0("== Dump all the properties of current host");
+ xbt_dict_foreach(host_props, cursor, key, data)
+ INFO2(" Host property: '%s' has value: '%s'", key, data);
+
+ INFO0("== Dump all the properties of alice");
+ xbt_dict_foreach(process_props, cursor, key, data)
+ if (!strncmp(key, "SG_TEST_", 8))
+ INFO2(" Process property: '%s' has value: '%s'", key, data);
+
+ INFO0("== Try to get a process property that does not exist");
+ value = gras_process_property_value("Nonexisting");
+ xbt_assert0(!value, "nonexisting property exists!!");
+
+ /* Modify an existing property. First check it exists */
+ INFO0("== Trying to modify a process property");
+ value = gras_process_property_value("new prop");
+ xbt_assert0(!value, "Property 'new prop' exists before I add it!");
+ xbt_dict_set(process_props, "new prop", xbt_strdup("new value"),
+ xbt_free_f);
+
+ /* Test if we have changed the value */
+ value = gras_process_property_value("new prop");
+ xbt_assert1(!strcmp(value, "new value"),
+ "New property does have the value I've set ('%s' != 'new value')",
+ value);
+