Logger_test.anubis 817 Bytes

 *Project*                             The Anubis Project
   
 *Title*                      Tests of implementation of Logger object
   
 *Copyright*                     Copyright (c) David René 2006. 


   

 *Created: 2006 03 21  
 *Author*  David René
 
 Unit test of logger Anubis object
 
read system/Logger.anubis
read tools/basis.anubis
read tools/streams.anubis   



define One testLogInfo (One u)  =
 with log = createLogger("c:\\logger.log"),
  logCriticalError(log,"Test CRITICAL ERROR");
  logError(log,"Test ERROR");
  logWarning(log,"Test WARNING");
  logInfo(log,"Test INFO");
  logDebug(log,"Test DEBUG");
  logTrace(log,"Test TRACE").

define One syntax =
  print(" Usage: inifile_test <filename> ... <filename>\n").
  
global define One logger_test ( List(String) args ) =
  testLogInfo(unique).