Subversion Repositories or1k

# Debug window class definition for GDBtk.

# Copyright 1998, 1999 Cygnus Solutions

#

# This program is free software; you can redistribute it and/or modify it

# under the terms of the GNU General Public License (GPL) as published by

# the Free Software Foundation; either version 2 of the License, or (at

# your option) any later version.

#

# This program is distributed in the hope that it will be useful,

# but WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

# GNU General Public License for more details.

# -----------------------------------------------------------------------------

# NAME:

#       class DebugWin

#

# DESC:

#       This class implements a debug output window to display internal

#       debugging information. It can handle debugging messages, tracing,

#       and eventually profiling.

#

# NOTES:

#       This window is for developers.

#

# -----------------------------------------------------------------------------

class DebugWin {

  inherit ManagedWin

  private {

    variable _t

    variable _colors {

      {I green}

      {W yellow}

      {E orange}

      {X red}

    }

    variable _bigstr "                                                                                                                                                                                                             "

    method build_win {}

    method _source_all {}

    method _clear {}

    method _mark_old {}

    method _save_contents {}

  }

  public {

    method constructor {args}

    method destructor {}

    method puts {level cls func msg}

    method put_trace {enter level func ar}

    method loadlog {}

  }

}

# -----------------------------------------------------------------------------

# NAME:

#       class DebugWinDOpts

#

# DESC:

#       This class implements a debug options dialog for the DebugWin.

#       Currently this consists os a selection dialog to choose which

#       messages to print. Eventually it could also include a filter

#       for different priorities and color selections.

#

# NOTES:

#       This window is for developers.

#

# -----------------------------------------------------------------------------

class DebugWinDOpts {

  inherit ManagedWin

  public {

    method constructor {args} {}

    method destructor {}

  }

  private {

    variable _classes

    method build_win {}

    method _all {}

    method _apply {}

  }

}