1 /* -----------------------------------------------------------------------------
2 * $Id: VisCallbacks.c,v 1.1 2000/11/01 11:41:47 simonmar Exp $
4 * (c) The GHC Team 2000
6 * RTS GTK Front Panel (callbacks)
8 * ---------------------------------------------------------------------------*/
10 #ifdef RTS_GTK_FRONTPANEL
12 #define NON_POSIX_SOURCE
18 #include "VisCallbacks.h"
19 #include "VisWindow.h"
20 #include "VisSupport.h"
21 #include "FrontPanel.h"
24 on_cont_radio_clicked (GtkButton *button,
27 update_mode = Continuous;
32 on_stop_before_radio_clicked (GtkButton *button,
35 update_mode = BeforeGC;
40 on_stop_after_radio_clicked (GtkButton *button,
43 update_mode = AfterGC;
48 on_stop_both_radio_clicked (GtkButton *button,
51 update_mode = BeforeAfterGC;
56 on_stop_but_clicked (GtkButton *button,
64 on_continue_but_clicked (GtkButton *button,
72 on_quit_but_clicked (GtkButton *button,
78 #endif /* RTS_GTK_FRONTPANEL */