-- -----------------------------------------------------------------------
--
-- $Source: /repository/uni/htk/toolkit/CItem.hs,v $
--
-- HTk - a GUI toolkit for Haskell  -  (c) Universitaet Bremen
--
-- $Revision: 1.3 $ from $Date: 2001/12/17 20:54:58 $
-- Last modification by $Author: ludi $
--
-- -----------------------------------------------------------------------

---
-- Objects with a name and an icon (used for several purposes).
module CItem (

  CItem(..)

) where

import HTk
import Name


------------------------------------------------------------
-- class CItem collects all properties items need to have --
------------------------------------------------------------

---
-- Objects with a name and an icon.
class Eq c => CItem c where
---
-- Gets the object's name.
  getName :: c -> IO Name
---
-- Gets the object's icon.
  getIcon :: c -> IO Image