home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 mARCH / PCWK3A99.iso / Linux / DDD331 / DDD-3_1_.000 / DDD-3_1_ / ddd-3.1.1 / ddd / VSLErr.C < prev    next >
C/C++ Source or Header  |  1998-11-23  |  2KB  |  102 lines
  1. // $Id: VSLErr.C,v 1.11 1998/11/23 17:43:44 zeller Exp $
  2. // VSLLib error handling
  3.  
  4. // Copyright (C) 1995 Technische Universitaet Braunschweig, Germany.
  5. // Written by Andreas Zeller <zeller@ips.cs.tu-bs.de>.
  6. // 
  7. // This file is part of DDD.
  8. // 
  9. // DDD is free software; you can redistribute it and/or
  10. // modify it under the terms of the GNU General Public
  11. // License as published by the Free Software Foundation; either
  12. // version 2 of the License, or (at your option) any later version.
  13. // 
  14. // DDD is distributed in the hope that it will be useful,
  15. // but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  17. // See the GNU General Public License for more details.
  18. // 
  19. // You should have received a copy of the GNU General Public
  20. // License along with DDD -- see the file COPYING.
  21. // If not, write to the Free Software Foundation, Inc.,
  22. // 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  23. // 
  24. // DDD is the data display debugger.
  25. // For details, see the DDD World-Wide-Web page, 
  26. // `http://www.cs.tu-bs.de/softech/ddd/',
  27. // or send a mail to the DDD developers <ddd@ips.cs.tu-bs.de>.
  28.  
  29. char VSLErr_rcsid[] = 
  30.     "$Id: VSLErr.C,v 1.11 1998/11/23 17:43:44 zeller Exp $";
  31.  
  32. #include <iostream.h>
  33. #include <strstream.h>
  34. #include "strclass.h"
  35.  
  36. #include "VSLLib.h"
  37. #include "VSLDef.h"
  38.  
  39.  
  40.  
  41. // General error interface
  42.  
  43. // Error handling
  44. void VSLLib::echo(const string& msg)
  45. {
  46.     cerr << msg << '\n';
  47. }
  48.  
  49. // Evaluation errors
  50. void VSLLib::eval_echo(const string& errmsg, const VSLDef *d)
  51. {
  52.     if (d == 0 && VSLDef::backtrace)
  53.     {
  54.     // Find topmost def
  55.     for (int i = 0; VSLDef::backtrace[i] != 0; i++)
  56.         d = VSLDef::backtrace[i];
  57.     }
  58.  
  59.     // Issue error message
  60.     if (d)
  61.     echo(d->longname() + ": " + errmsg);
  62.     else
  63.     echo(errmsg);
  64.  
  65.  
  66.     // Issue backtrace if desired
  67.     if (VSLDef::backtrace && VSLDef::backtrace[0])
  68.     {
  69.     static char line[] = "------------------------------";
  70.  
  71.     echo(line);
  72.     echo("Current stack:");
  73.  
  74.     int i;
  75.     for (i = 0; VSLDef::backtrace[i] != 0; i++)
  76.         ;
  77.  
  78.     for (i--; i >= 0; i--)
  79.     {
  80.         ostrstream os;
  81.         os << i << " -- " << VSLDef::backtrace[i]->longname() 
  82.            << *VSLDef::backtrace_args[i];
  83.  
  84.         echo(os);
  85.     }
  86.  
  87.     echo(line);
  88.     }
  89. }
  90.  
  91. // Error during evaluation
  92. void VSLLib::eval_error(const string& errmsg, const VSLDef *d)
  93. {
  94.     eval_echo(errmsg, d);
  95. }
  96.  
  97. // Warning during evaluation
  98. void VSLLib::eval_warning(const string& errmsg, const VSLDef *d)
  99. {
  100.     eval_echo("warning: " + errmsg, d);
  101. }
  102.