aboutsummaryrefslogtreecommitdiff
path: root/src/syslog.sci
diff options
context:
space:
mode:
Diffstat (limited to 'src/syslog.sci')
-rw-r--r--src/syslog.sci50
1 files changed, 50 insertions, 0 deletions
diff --git a/src/syslog.sci b/src/syslog.sci
new file mode 100644
index 0000000..46e00fa
--- /dev/null
+++ b/src/syslog.sci
@@ -0,0 +1,50 @@
+;;;; This file is part of Gamma. -*- scheme -*-
+;;;; Copyright (C) 2010 Sergey Poznyakoff
+;;;;
+;;;; Gamma 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 3, or (at your option)
+;;;; any later version.
+;;;;
+;;;; Gamma 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 Gamma. If not, see <http://www.gnu.org/licenses/>.
+
+changequote([,])dnl
+
+(define-module (gamma syslog))
+
+(let ((lib-path "LIBDIR/"))
+ (load-extension (string-append
+ lib-path "libgamma-syslog-v-VERSION") "syslog_init"))
+
+include(BUILDDIR/syslog.inc)
+
+(export LOG_USER)
+(export LOG_DAEMON)
+(export LOG_AUTH)
+(export LOG_LOCAL0)
+(export LOG_LOCAL1)
+(export LOG_LOCAL2)
+(export LOG_LOCAL3)
+(export LOG_LOCAL4)
+(export LOG_LOCAL5)
+(export LOG_LOCAL6)
+(export LOG_LOCAL7)
+(export LOG_EMERG)
+(export LOG_ALERT)
+(export LOG_CRIT)
+(export LOG_ERR)
+(export LOG_WARNING)
+(export LOG_NOTICE)
+(export LOG_INFO)
+(export LOG_DEBUG)
+(export LOG_CONS)
+(export LOG_NDELAY)
+(export LOG_PID)
+
+;;;; End of syslog.scm

Return to:

Send suggestions and report system problems to the System administrator.