home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Source Code / C++ / Snippets / GNU String⁄Regex / error.cc < prev    next >
Encoding:
C/C++ Source or Header  |  1995-07-07  |  1.5 KB  |  52 lines  |  [TEXT/CWIE]

  1. /* 
  2. Copyright (C) 1990 Free Software Foundation
  3.     written by Doug Lea (dl@rocky.oswego.edu)
  4.  
  5. This file is part of the GNU C++ Library.  This library is free
  6. software; you can redistribute it and/or modify it under the terms of
  7. the GNU Library General Public License as published by the Free
  8. Software Foundation; either version 2 of the License, or (at your
  9. option) any later version.  This library is distributed in the hope
  10. that it will be useful, but WITHOUT ANY WARRANTY; without even the
  11. implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
  12. PURPOSE.  See the GNU Library General Public License for more details.
  13. You should have received a copy of the GNU Library General Public
  14. License along with this library; if not, write to the Free Software
  15. Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  16. */
  17.  
  18. #ifdef __GNUG__
  19. #pragma implementation
  20. #endif
  21. #include "builtin.h"
  22. #include  "Exception.h" // 5Jul95ww
  23.  
  24.  
  25. _VOLATILE_VOID default_one_arg_error_handler(const char* msg)
  26. {
  27.   fputs("Error: ", stderr);
  28.   fputs(msg, stderr);
  29.   fputs("\n", stderr);
  30.   FAIL( 523 );
  31. }
  32.  
  33.  
  34. _VOLATILE_VOID default_two_arg_error_handler(const char* kind, const char* msg)
  35. {
  36.   fputs(kind, stderr);
  37.   fputs(" Error: ", stderr);
  38.   fputs(msg, stderr);
  39.   fputs("\n", stderr);
  40.   FAIL( 523 );
  41. }
  42.  
  43. two_arg_error_handler_t lib_error_handler = default_two_arg_error_handler;
  44.  
  45. two_arg_error_handler_t set_lib_error_handler(two_arg_error_handler_t f)
  46. {
  47.   two_arg_error_handler_t old = lib_error_handler;
  48.   lib_error_handler = f;
  49.   return old;
  50. }
  51.  
  52.