1-- 2-- Copyright (c) 2008, 3-- Reto Buerki, Adrian-Ken Rueegsegger 4-- 5-- This file is part of Alog. 6-- 7-- Alog is free software; you can redistribute it and/or modify 8-- it under the terms of the GNU Lesser General Public License as published 9-- by the Free Software Foundation; either version 2.1 of the License, or 10-- (at your option) any later version. 11-- 12-- Alog is distributed in the hope that it will be useful, 13-- but WITHOUT ANY WARRANTY; without even the implied warranty of 14-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15-- GNU Lesser General Public License for more details. 16-- 17-- You should have received a copy of the GNU Lesser General Public License 18-- along with Alog; if not, write to the Free Software 19-- Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, 20-- MA 02110-1301 USA 21-- 22 23pragma Detect_Blocking; 24 25-- Alog: Ada Logging Components. Provides easy to use API for different 26-- logging facilities and log message transforms. 27package Alog is 28 29 pragma Preelaborate; 30 31 type Log_Level is 32 (Debug, 33 Info, 34 Notice, 35 Warning, 36 Error, 37 Critical, 38 Alert, 39 Emergency); 40 -- Provided log levels. These log levels can be used to categorize log 41 -- messages. 42 43 Max_Path_Length : constant Natural := 1024; 44 -- Maximal length of path names. 45 46 Max_Facilities : constant Natural := 15; 47 -- Maximum number of facilities a single logger instance 48 -- can manage. 49 50end Alog; 51