some work log system for camel some utilities for GString objects

1999-04-18  bertrand <Bertrand.Guiheneuf@inria.fr>

	* camel/camel-folder.c: some work
	* camel/camel-log.c: log system for camel
	* camel/gstring-util.c: some utilities for GString objects


Work on obmail translation.

Bertrand

svn path=/trunk/; revision=851

1 files changed, 39 insertions, 0 deletions

diff --git a/camel/camel-log.c b/camel/camel-log.c
new file mode 100644
index 0000000000..fba71e9414
--- /dev/null
+++ b/camel/camel-log.c
@@ -0,0 +1,39 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
+
+/* 
+ *
+ * Copyright (C) 1999 Bertrand Guiheneuf <Bertrand.Guiheneuf@inria.fr> .
+ *
+ * This program is free software; you can redistribute it and/or 
+ * modify it under the terms of the GNU General Public License as 
+ * published by the Free Software Foundation; either version 2 of the
+ * License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
+ * USA
+ */
+
+
+#include "camel-log.h"
+
+int camel_debug_level = 10;
+FILE *camel_log_file_descriptor = stderr;
+
+void
+camel_log(CamelLogLevel level, const gchar *format, ... )
+{
+	va_list args;
+	if (level<=camel_debug_level)
+		{
+			va_start(args, format);
+			vfprintf(camel_log_file_descriptor, format, args);
+			va_end (args);
+		}
+}