From 47dc4ac9eccd2e808b4c4d8e9e2be3702e1a6444 Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Mon, 27 Jan 2025 11:51:38 +1300
Subject: Added Fl_Table

---
 body/c_fl_scroll.cpp | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'body/c_fl_scroll.cpp')

diff --git a/body/c_fl_scroll.cpp b/body/c_fl_scroll.cpp
index 5fd3240..3707b52 100644
--- a/body/c_fl_scroll.cpp
+++ b/body/c_fl_scroll.cpp
@@ -10,6 +10,21 @@
 
 
 
+//  Telprot stopovers
+
+extern "C" void scroll_extra_init_hook(void * aobj, int x, int y, int w, int h, const char * l);
+void fl_scroll_extra_init(void * adaobj, int x, int y, int w, int h, const char * label) {
+    scroll_extra_init_hook(adaobj, x, y, w, h, label);
+}
+
+extern "C" void scroll_extra_final_hook(void * aobj);
+void fl_scroll_extra_final(void * adaobj) {
+    scroll_extra_final_hook(adaobj);
+}
+
+
+
+
 //  Exports from Ada
 
 extern "C" void widget_draw_hook(void * ud);
-- 
cgit