From b7ff965e58eb6434e3b27123ed2c1e40c6880610 Mon Sep 17 00:00:00 2001
From: Pierre Veyre <pierre.veyre@cc.in2p3.fr>
Date: Tue, 24 Sep 2013 11:23:17 +0200
Subject: [PATCH] Add MSG_storage_set_property_value function

---
 src/msg/msg_io.c | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/src/msg/msg_io.c b/src/msg/msg_io.c
index ed88e74596..24147acb42 100644
--- a/src/msg/msg_io.c
+++ b/src/msg/msg_io.c
@@ -242,6 +242,18 @@ xbt_dict_t MSG_storage_get_properties(msg_storage_t storage)
   return (simcall_storage_get_properties(storage));
 }
 
+/** \ingroup msg_storage_management
+ * \brief Change the value of a given storage property
+ *
+ * \param storage a storage
+ * \param name a property name
+ * \param value what to change the property to
+ * \param free_ctn the freeing function to use to kill the value on need
+ */
+void MSG_storage_set_property_value(msg_storage_t storage, const char *name, char *value,void_f_pvoid_t free_ctn) {
+  xbt_dict_set(MSG_storage_get_properties(storage), name, value,free_ctn);
+}
+
 /** \ingroup msg_storage_management
  * \brief Finds a msg_storage_t using its name.
  * \param name the name of a storage
-- 
2.20.1