Update of /cvsroot/htoolkit/port/src/Port
In directory sc8-pr-cvs1:/tmp/cvs-serv32717/src/Port
Added Files:
StatusBar.hs
Log Message:
Basic support for statusbar
--- NEW FILE: StatusBar.hs ---
{-# OPTIONS -fglasgow-exts -#include Types.h #-}
-----------------------------------------------------------------------------------------
{-| Module : StatusBar
Copyright : (c) Krasimir Angelov 2003
License : BSD-style
Maintainer : ka2...@ya...
Stability : provisional
Portability : portable
Defines an API for status bar creation.
A status bar is a horizontal band at the bottom of an application window
in which the application can display various kinds of status information.
-}
-----------------------------------------------------------------------------------------
module Graphics.UI.Port.StatusBar
( setStatusBarVisible, getStatusBarVisible
) where
foreign import ccall "osSetStatusBarVisible" setStatusBarVisible :: Bool -> IO ()
foreign import ccall "osGetStatusBarVisible" getStatusBarVisible :: IO Bool
|
