// Programmed by Jedidiah Barber // Released into the public domain #include #include "c_fl_fill_slider.h" // Exports from Ada extern "C" void widget_draw_hook(void * ud); extern "C" int widget_handle_hook(void * ud, int e); // Attaching all relevant hooks and friends class My_Fill_Slider : public Fl_Fill_Slider { public: using Fl_Fill_Slider::Fl_Fill_Slider; friend void fl_fill_slider_draw(FILLSLIDER s); friend int fl_fill_slider_handle(FILLSLIDER s, int e); void draw(); int handle(int e); }; void My_Fill_Slider::draw() { widget_draw_hook(this->user_data()); } int My_Fill_Slider::handle(int e) { return widget_handle_hook(this->user_data(), e); } // Flattened C API FILLSLIDER new_fl_fill_slider(int x, int y, int w, int h, char* label) { My_Fill_Slider *s = new My_Fill_Slider(x, y, w, h, label); return s; } void free_fl_fill_slider(FILLSLIDER s) { delete reinterpret_cast(s); } void fl_fill_slider_draw(FILLSLIDER s) { reinterpret_cast(s)->Fl_Fill_Slider::draw(); } int fl_fill_slider_handle(FILLSLIDER s, int e) { return reinterpret_cast(s)->Fl_Fill_Slider::handle(e); }