src/Gtk/Tune.icl


1
2
3
4
5
6
7
8
9
10
11

implementation module Gtk.Tune

import StdEnv

import Control.Applicative
import Control.Monad

import Gtk

(<<@) infixl 2 :: !(GtkM elem) !option -> GtkM elem | tune elem option
(<<@) elemf option = elemf >>= tune option