barrie-0.4.1: demos/AutoCalc.hs

--  Calculator demo for Barrie 0.3

module Main where

import Barrie

import CalcState
import CalcGadget

--  The style lets you change colours, fonts, etc
calcStyle :: Style
calcStyle = emptyStyle

main = do mapM_ putStrLn $ widgetToLines (createLayout calcGUI)
          gtkMain calcGUI (createLayout calcGUI) startState