X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/4725d7a4bc5ac1fdae3e86222cdc23eaaf6fb226..a182030b5a8c0db05a1de18ca230b61e76363ebc:/src/xbt/xbt_log_appender_file.c

diff --git a/src/xbt/xbt_log_appender_file.c b/src/xbt/xbt_log_appender_file.c
index 3c72683485..28c9b56c0a 100644
--- a/src/xbt/xbt_log_appender_file.c
+++ b/src/xbt/xbt_log_appender_file.c
@@ -15,19 +15,30 @@
  * The root category's default logging function.
  */
 
-extern const char *xbt_log_priority_names[7];
+extern const char *xbt_log_priority_names[8];
 
 
-static void append_file(xbt_log_appender_t this_appender,
-                        char *str) {
+static void append_file(xbt_log_appender_t this_appender, char *str)
+{
+  fprintf((FILE *) (this_appender->data), "%s", str);
+}
 
-  fprintf((FILE*)(this_appender->data), "%s", str);
+static void free_(xbt_log_appender_t this_)
+{
+  if (this_->data != stderr)
+    fclose(this_->data);
 }
 
-xbt_log_appender_t xbt_log_appender_file_new(char *arg){
-  xbt_log_appender_t res = xbt_new0(s_xbt_log_appender_t,1);
+
+
+xbt_log_appender_t xbt_log_appender_file_new(char *arg)
+{
+  xbt_log_appender_t res = xbt_new0(s_xbt_log_appender_t, 1);
   res->do_append = append_file;
-  res->free_ = NULL;
-  res->data = (void*)stderr;
+  res->free_ = free_;
+  if (arg)
+    res->data = (void *) fopen(arg, "w");
+  else
+    res->data = (void *) stderr;
   return res;
 }