/*
 * $Id$
 */

/*
 * The following parts are Copyright of the individual authors.
 * www - http://www.harbour-project.org
 *
 * Copyright 1999 Chen Kedem <niki@actcom.co.il>
 *    Documentation for: ERRORSYS()
 *
 * See doc/license.txt for licensing terms.
 *
 */

/*  $DOC$
 *  $FUNCNAME$
 *      ERRORSYS()
 *  $CATEGORY$
 *      Error recovery
 *  $ONELINER$
 *      Install default error handler
 *  $SYNTAX$
 *      ERRORSYS() --> NIL 
 *  $ARGUMENTS$
 *      None.   
 *  $RETURNS$
 *      ERRORSYS() always return NIL.   
 *  $DESCRIPTION$
 *      ERRORSYS() is called upon startup by Harbour and install the default
 *      error handler. Normally you should not call this function directly,
 *      instead use ERRORBLOCK() to install your own error handler.   
 *  $STATUS$
 *      R
 *  $COMPLIANCE$
 *      ERRORSYS() works exactly like CA-Clipper's ERRORSYS().   
 *  $FILES$
 *      Library is rtl
 *  $SEEALSO$
 *      ERRORBLOCK(),Error class
 *  $END$
 */