1 (* Copyright (C) 2000-2005,
2 * Luca Padovani <lpadovan@cs.unibo.it>
3 * Claudio Sacerdoti Coen <sacerdot@cs.unibo.it>
4 * Stefano Zacchiroli <zacchiro@cs.unibo.it>
6 * This file is part of lablgtkmathview, the Ocaml binding for the
9 * lablgtkmathview is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License as
11 * published by the Free Software Foundation; either version 2 of the
12 * License, or (at your option) any later version.
14 * lablgtkmathview is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with lablgtkmathview; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
24 * For details, send a mail to the authors.
27 class single_selection_math_view_signals :
28 ([> `gtk | `mathview_gmetadom | `widget] as 'b) Gtk.obj ->
29 ((Gdome.element option -> unit) -> unit) ->
31 inherit GMathView.math_view_signals
32 method selection_changed : (Gdome.element_of_node option -> unit) -> unit
35 class single_selection_math_view :
36 Gtk_mathview.math_view Gtk.obj ->
38 inherit GMathView.math_view_skel
39 method connect : single_selection_math_view_signals
40 method get_selection : Gdome.element option
41 method set_selection : Gdome.element option -> unit
42 method action_toggle : Gdome.element -> bool
45 val single_selection_math_view :
46 ?hadjustment:GData.adjustment ->
47 ?vadjustment:GData.adjustment ->
52 ?packing:(GObj.widget -> unit) ->
55 single_selection_math_view
57 class multi_selection_math_view :
58 Gtk_mathview.math_view Gtk.obj ->
60 inherit single_selection_math_view
61 method remove_selection : Gdome.element -> unit
62 method remove_selections : unit
63 method add_selection : Gdome.element -> unit
64 method get_selections : Gdome.element list
67 val multi_selection_math_view :
68 ?hadjustment:GData.adjustment ->
69 ?vadjustment:GData.adjustment ->
74 ?packing:(GObj.widget -> unit) ->
77 multi_selection_math_view