summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--doc/filename.html2
-rw-r--r--doc/fl_ask.html14
-rw-r--r--doc/fl_bitmap.html37
-rw-r--r--doc/fl_bmp_image.html2
-rw-r--r--doc/fl_copy_surface.html3
-rw-r--r--doc/fl_gif_image.html2
-rw-r--r--doc/fl_graphics_driver.html48
-rw-r--r--doc/fl_help_dialog.html14
-rw-r--r--doc/fl_image.html147
-rw-r--r--doc/fl_image_surface.html3
-rw-r--r--doc/fl_jpeg_image.html2
-rw-r--r--doc/fl_label.html11
-rw-r--r--doc/fl_menu_item.html104
-rw-r--r--doc/fl_paged_device.html21
-rw-r--r--doc/fl_pixmap.html47
-rw-r--r--doc/fl_png_image.html2
-rw-r--r--doc/fl_pnm_image.html2
-rw-r--r--doc/fl_preferences.html54
-rw-r--r--doc/fl_rgb_image.html59
-rw-r--r--doc/fl_shared_image.html173
-rw-r--r--doc/fl_text_buffer.html97
-rw-r--r--doc/fl_tiled_image.html30
-rw-r--r--doc/fl_xbm_image.html2
-rw-r--r--doc/fl_xpm_image.html2
-rw-r--r--progress.txt35
-rw-r--r--src/fltk-environment.ads2
-rw-r--r--src/fltk-help_dialogs.adb16
27 files changed, 809 insertions, 122 deletions
diff --git a/doc/filename.html b/doc/filename.html
index a922359..8759679 100644
--- a/doc/filename.html
+++ b/doc/filename.html
@@ -68,7 +68,7 @@
<table class="function">
- <tr><th colspan="2">Attributes</th></tr>
+ <tr><th colspan="2">Static Attributes</th></tr>
<tr>
<td><pre>
diff --git a/doc/fl_ask.html b/doc/fl_ask.html
index 857f5f5..6d72892 100644
--- a/doc/fl_ask.html
+++ b/doc/fl_ask.html
@@ -37,32 +37,32 @@
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>int</td>
<td>Confirm_Result</td>
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>int</td>
<td>Choice_Result</td>
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>int</td>
<td>Extended_Choice_Result</td>
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>double</td>
<td>RGB_Float</td>
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>uchar</td>
<td>RGB_Int</td>
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>void(*cb)(const char *)</td>
<td>File_Chooser_Callback</td>
</tr>
@@ -159,7 +159,7 @@ procedure Alert
<td><pre>
int fl_ask(const char *fmt,...);
</pre></td>
-<td>Deprecated</td>
+<td>Deprecated.</td>
</tr>
<tr>
diff --git a/doc/fl_bitmap.html b/doc/fl_bitmap.html
index d69f8a8..2a8cc72 100644
--- a/doc/fl_bitmap.html
+++ b/doc/fl_bitmap.html
@@ -46,7 +46,28 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Attributes</th></tr>
+
+ <tr>
+<td><pre>
+int alloc_array;
+</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+ <tr>
+<td><pre>
+const uchar * array;
+</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
@@ -62,6 +83,13 @@ function Create
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
virtual Fl_Image * copy(int W, int H);
@@ -87,7 +115,8 @@ function Copy
<tr>
<td><pre>
-virtual void draw(int X, int Y, int W, int H, int cx=0, int cy=0);
+virtual void draw(int X, int Y, int W, int H,
+ int cx=0, int cy=0);
</pre></td>
<td><pre>
procedure Draw
@@ -112,14 +141,14 @@ procedure Draw
<td><pre>
virtual void label(Fl_Widget *w);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
<td><pre>
virtual void label(Fl_Menu_Item *m);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
diff --git a/doc/fl_bmp_image.html b/doc/fl_bmp_image.html
index 95a04df..d1984d6 100644
--- a/doc/fl_bmp_image.html
+++ b/doc/fl_bmp_image.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
diff --git a/doc/fl_copy_surface.html b/doc/fl_copy_surface.html
index 412f58d..8dee54e 100644
--- a/doc/fl_copy_surface.html
+++ b/doc/fl_copy_surface.html
@@ -101,7 +101,8 @@ procedure Draw_Widget
<tr>
<td><pre>
-void draw_decorated_window(Fl_Window *win, int delta_x=0, int delta_y=0);
+void draw_decorated_window(Fl_Window *win, int delta_x=0,
+ int delta_y=0);
</pre></td>
<td><pre>
procedure Draw_Decorated_Window
diff --git a/doc/fl_gif_image.html b/doc/fl_gif_image.html
index 0731bb2..1a8a070 100644
--- a/doc/fl_gif_image.html
+++ b/doc/fl_gif_image.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
diff --git a/doc/fl_graphics_driver.html b/doc/fl_graphics_driver.html
index 1fa72bb..b0a435e 100644
--- a/doc/fl_graphics_driver.html
+++ b/doc/fl_graphics_driver.html
@@ -51,20 +51,55 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Static Attributes</th></tr>
+
+ <tr>
+<td><pre>
+static const char * class_id = "Fl_Graphics_Driver";
+</pre></td>
+<td>Deprecated, use runtime tag checks instead.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Protected Attributes</th></tr>
+
+ <tr>
+<td><pre>
+matrix * fl_matrix;
+</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
Fl_Graphics_Driver();
</pre></td>
-<td>TBA</td>
+<td>&nbsp;</td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
virtual const char * class_name();
</pre></td>
-<td>Use runtime tag checks instead</td>
+<td>Deprecated, use runtime tag checks instead</td>
</tr>
<tr>
@@ -194,6 +229,13 @@ function Get_Width
</table>
+
+<table class="function">
+ <tr><th colspan="2">Protected Functions and Procedures</th></tr>
+
+</table>
+
+
</body>
</html>
diff --git a/doc/fl_help_dialog.html b/doc/fl_help_dialog.html
index 09ed04f..43c0f9c 100644
--- a/doc/fl_help_dialog.html
+++ b/doc/fl_help_dialog.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
@@ -55,13 +55,25 @@ Fl_Help_Dialog();
<td><pre>
function Create
return Help_Dialog;
+</pre></td>
+ </tr>
+ <tr>
+<td>Create a Fl_Help_Dialog and then resize manually.</td>
+<td><pre>
function Create
(X, Y, W, H : in Integer)
return Help_Dialog;
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
int h();
diff --git a/doc/fl_image.html b/doc/fl_image.html
index 5078aaa..7550b5c 100644
--- a/doc/fl_image.html
+++ b/doc/fl_image.html
@@ -47,7 +47,7 @@
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>float</td>
<td>Blend</td>
</tr>
@@ -78,26 +78,27 @@
<table class="function">
- <tr><th colspan="2">Static Functions and Procedures</th></tr>
+ <tr><th colspan="2">Static Attributes</th></tr>
<tr>
<td><pre>
-static void RGB_scaling(Fl_RGB_Scaling);
-</pre></td>
-<td><pre>
-procedure Set_Copy_Algorithm
- (To : in Scaling_Kind);
+static const int ERR_FILE_ACCESS = -2;
</pre></td>
+<td>&nbsp;</td>
</tr>
<tr>
<td><pre>
-static Fl_RGB_Scaling RGB_scaling();
+static const int ERR_FORMAT = -3;
</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+ <tr>
<td><pre>
-function Get_Copy_Algorithm
- return Scaling_Kind;
+static const int ERR_NO_IMAGE = -1;
</pre></td>
+<td>&nbsp;</td>
</tr>
</table>
@@ -105,7 +106,7 @@ function Get_Copy_Algorithm
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
@@ -118,6 +119,40 @@ function Create
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Static Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+static void RGB_scaling(Fl_RGB_Scaling);
+</pre></td>
+<td><pre>
+procedure Set_Copy_Algorithm
+ (To : in Scaling_Kind);
+</pre></td>
+ </tr>
+
+ <tr>
+<td><pre>
+static Fl_RGB_Scaling RGB_scaling();
+</pre></td>
+<td><pre>
+function Get_Copy_Algorithm
+ return Scaling_Kind;
+</pre></td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
virtual void color_average(Fl_Color c, float i);
@@ -273,17 +308,6 @@ procedure Draw
<tr>
<td><pre>
-void draw_empty(int X, int Y);
-</pre></td>
-<td><pre>
-procedure Draw_Empty
- (This : in Image;
- X, Y : in Integer);
-</pre></td>
- </tr>
-
- <tr>
-<td><pre>
int fail();
</pre></td>
<td><pre>
@@ -318,14 +342,14 @@ procedure Inactive
<td><pre>
virtual void label(Fl_Widget *w);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
<td><pre>
virtual void label(Fl_Menu_Item *m);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
@@ -363,6 +387,81 @@ function Get_W
</table>
+
+<table class="function">
+ <tr><th colspan="2">Static Protected Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+static void labeltype(const Fl_Label *lo, int lx, int ly,
+ int lw, int lh, Fl_Align la);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+static void measure(const Fl_Label *lo, int &lw, int &lh);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Protected Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+void d(int D);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+void data(const char *const *p, int c);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+void draw_empty(int X, int Y);
+</pre></td>
+<td><pre>
+procedure Draw_Empty
+ (This : in Image;
+ X, Y : in Integer);
+</pre></td>
+ </tr>
+
+ <tr>
+<td><pre>
+void h(int H);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+void ld(int LD);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+void w(int W);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
</body>
</html>
diff --git a/doc/fl_image_surface.html b/doc/fl_image_surface.html
index 2a47652..46f6575 100644
--- a/doc/fl_image_surface.html
+++ b/doc/fl_image_surface.html
@@ -102,7 +102,8 @@ procedure Draw_Widget
<tr>
<td><pre>
-void draw_decorated_window(Fl_Window *win, int delta_x=0, int delta_y=0);
+void draw_decorated_window(Fl_Window *win, int delta_x=0,
+ int delta_y=0);
</pre></td>
<td><pre>
procedure Draw_Decorated_Window
diff --git a/doc/fl_jpeg_image.html b/doc/fl_jpeg_image.html
index 506bd62..9ca77b4 100644
--- a/doc/fl_jpeg_image.html
+++ b/doc/fl_jpeg_image.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
diff --git a/doc/fl_label.html b/doc/fl_label.html
index ec078c3..dbdfeae 100644
--- a/doc/fl_label.html
+++ b/doc/fl_label.html
@@ -46,10 +46,10 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
-<td>&nbsp;</td>
+<td>Initialize manually as per any other struct.</td>
<td><pre>
function Create
(Value : in String;
@@ -64,6 +64,13 @@ function Create
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
Fl_Align align_;
diff --git a/doc/fl_menu_item.html b/doc/fl_menu_item.html
index b01c4e6..e64aec7 100644
--- a/doc/fl_menu_item.html
+++ b/doc/fl_menu_item.html
@@ -46,10 +46,80 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Attributes</th></tr>
+
+ <tr>
+<td><pre>
+Fl_Callback * callback_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+int flags;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+Fl_Color labelcolor_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+Fl_Font labelfont_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+Fl_Fontsize labelsize_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
<tr>
-<td>N/A due to being a struct, not a class</td>
+<td><pre>
+uchar labeltype_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+int shortcut_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+const char * text;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+void * user_data_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Constructors</th></tr>
+
+ <tr>
+<td>Initialize manually as per any other struct.</td>
<td><pre>
function Create
(Text : in String;
@@ -60,6 +130,13 @@ function Create
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
void activate();
@@ -94,14 +171,16 @@ function Is_Active_And_Visible
<tr>
<td><pre>
-int add(const char *, int shortcut, Fl_Callback *, void *=0, int=0);
+int add(const char *, int shortcut, Fl_Callback *,
+ void *=0, int=0);
</pre></td>
<td>See Add procedure in FLTK.Widgets.Menus</td>
</tr>
<tr>
<td><pre>
-int add(const char *a, const char *b, Fl_Callback *c, void *d=0, int e=0);
+int add(const char *a, const char *b, Fl_Callback *c,
+ void *d=0, int e=0);
</pre></td>
<td>&nbsp;</td>
</tr>
@@ -134,8 +213,11 @@ function Get_Callback
<tr>
<td><pre>
void callback(Fl_Callback *c, void *p);
+
void callback(Fl_Callback *c);
+
void callback(Fl_Callback0 *c);
+
void callback(Fl_Callback1 *c, long p=0);
</pre></td>
<td><pre>
@@ -194,7 +276,9 @@ procedure Deactivate
<tr>
<td><pre>
void do_callback(Fl_Widget *o) const;
+
void do_callback(Fl_Widget *o, void *arg) const;
+
void do_callback(Fl_Widget *o, long arg) const;
</pre></td>
<td><pre>
@@ -206,14 +290,16 @@ procedure Do_Callback
<tr>
<td><pre>
-void draw(int x, int y, int w, int h, const Fl_Menu_ *, int t=0) const;
+void draw(int x, int y, int w, int h, const Fl_Menu_ *,
+ int t=0) const;
</pre></td>
<td>See Draw_Item procedure in FLTK.Widgets.Menus</td>
</tr>
<tr>
<td><pre>
-const Fl_Menu_Item * find_shortcut(int *ip=0, const bool require_alt=false) const;
+const Fl_Menu_Item * find_shortcut(int *ip=0,
+ const bool require_alt=false) const;
</pre></td>
<td>&nbsp;</td>
</tr>
@@ -221,6 +307,7 @@ const Fl_Menu_Item * find_shortcut(int *ip=0, const bool require_alt=false) cons
<tr>
<td><pre>
const Fl_Menu_Item * first() const;
+
Fl_Menu_Item * first();
</pre></td>
<td>Use FLTK.Widgets.Menus iterators instead</td>
@@ -257,6 +344,7 @@ procedure Hide
<tr>
<td><pre>
void image(Fl_Image *a);
+
void image(Fl_Image &a);
</pre></td>
<td>&nbsp;</td>
@@ -264,7 +352,8 @@ void image(Fl_Image &a);
<tr>
<td><pre>
-int insert(int, const char *, int, Fl_Callback *, void *=0, int=0);
+int insert(int, const char *, int, Fl_Callback *,
+ void *=0, int=0);
</pre></td>
<td>See Insert procedure in FLTK.Widgets.Menus</td>
</tr>
@@ -396,6 +485,7 @@ int measure(int *h, const Fl_Menu_ *) const;
<tr>
<td><pre>
const Fl_Menu_Item * next(int=1) const;
+
Fl_Menu_Item * next(int i=1);
</pre></td>
<td>Use FLTK.Widgets.Menus iterators instead</td>
diff --git a/doc/fl_paged_device.html b/doc/fl_paged_device.html
index 79dc467..da9ecb1 100644
--- a/doc/fl_paged_device.html
+++ b/doc/fl_paged_device.html
@@ -101,6 +101,27 @@ Page_Formats : constant Page_Format_Info_Array (A0 .. Envelope);
<table class="function">
+ <tr><th colspan="2">Protected Attributes</th></tr>
+
+ <tr>
+<td><pre>
+int x_offset;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+int y_offset;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
<tr><th colspan="2">Constructors</th></tr>
<tr>
diff --git a/doc/fl_pixmap.html b/doc/fl_pixmap.html
index 6f5c6e8..60fec01 100644
--- a/doc/fl_pixmap.html
+++ b/doc/fl_pixmap.html
@@ -46,18 +46,42 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Attributes</th></tr>
+
+ <tr>
+<td><pre>
+int alloc_data;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
Fl_Pixmap(char *const *D);
+
Fl_Pixmap(uchar *const *D);
+
Fl_Pixmap(const char *const *D);
+
Fl_Pixmap(const uchar *const *D);
</pre></td>
<td>&nbsp;</td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
virtual void color_average(Fl_Color c, float i);
@@ -105,7 +129,8 @@ procedure Desaturate
<tr>
<td><pre>
-virtual void draw(int X, int Y, int W, int H, int cx=0, int cy=0);
+virtual void draw(int X, int Y, int W, int H,
+ int cx=0, int cy=0);
</pre></td>
<td><pre>
procedure Draw
@@ -130,14 +155,14 @@ procedure Draw
<td><pre>
virtual void label(Fl_Widget *w);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
<td><pre>
virtual void label(Fl_Menu_Item *m);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
@@ -153,6 +178,20 @@ procedure Uncache
</table>
+
+<table class="function">
+ <tr><th colspan="2">Protected Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+void measure();
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
</body>
</html>
diff --git a/doc/fl_png_image.html b/doc/fl_png_image.html
index 3787fab..45ee57d 100644
--- a/doc/fl_png_image.html
+++ b/doc/fl_png_image.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
diff --git a/doc/fl_pnm_image.html b/doc/fl_pnm_image.html
index d71dcd7..fccbe91 100644
--- a/doc/fl_pnm_image.html
+++ b/doc/fl_pnm_image.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
diff --git a/doc/fl_preferences.html b/doc/fl_preferences.html
index 515bb0d..aece3c6 100644
--- a/doc/fl_preferences.html
+++ b/doc/fl_preferences.html
@@ -42,7 +42,7 @@
</tr>
<tr>
- <td>&nbsp;</td>
+ <td>Fl_Preferences</td>
<td>Pref_Group</td>
</tr>
@@ -79,7 +79,7 @@
<tr><th colspan="2">Errors</th></tr>
<tr>
- <td>&nbsp;</td>
+ <td>char</td>
<td>Preference_Error</td>
</tr>
@@ -88,23 +88,20 @@
<table class="function">
- <tr><th colspan="2">Static Functions and Procedures</th></tr>
+ <tr><th colspan="2">Protected Attributes</th></tr>
<tr>
<td><pre>
-static const char * newUUID();
-</pre></td>
-<td><pre>
-function New_UUID
- return String;
+Node * node;
</pre></td>
+<td>Intentionally left unbound.</td>
</tr>
<tr>
<td><pre>
-static char remove(ID id_);
+RootNode * rootNode;
</pre></td>
-<td>&nbsp;</td>
+<td>Intentionally left unbound.</td>
</tr>
</table>
@@ -112,7 +109,7 @@ static char remove(ID id_);
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
@@ -141,6 +138,7 @@ function From_Filesystem
<tr>
<td><pre>
Fl_Preferences(Fl_Preferences &parent, const char *group);
+
Fl_Preferences(Fl_Preferences *parent, const char *group);
</pre></td>
<td><pre>
@@ -158,6 +156,7 @@ function In_Memory
<tr>
<td><pre>
Fl_Preferences(Fl_Preferences &parent, int groupIndex);
+
Fl_Preferences(Fl_Preferences *parent, int groupIndex);
</pre></td>
<td><pre>
@@ -179,6 +178,37 @@ function Root
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Static Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+static const char * newUUID();
+</pre></td>
+<td><pre>
+function New_UUID
+ return String;
+</pre></td>
+ </tr>
+
+ <tr>
+<td><pre>
+static char remove(ID id_);
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
char clear();
@@ -457,7 +487,7 @@ function Number_Of_Groups
<td><pre>
ID id();
</pre></td>
-<td>&nbsp;</td>
+<td>Intentionally left unbound.</td>
</tr>
<tr>
diff --git a/doc/fl_rgb_image.html b/doc/fl_rgb_image.html
index 70a46d8..1e115d5 100644
--- a/doc/fl_rgb_image.html
+++ b/doc/fl_rgb_image.html
@@ -46,26 +46,20 @@
<table class="function">
- <tr><th colspan="2">Static Functions and Procedures</th></tr>
+ <tr><th colspan="2">Attributes</th></tr>
<tr>
<td><pre>
-static void max_size(size_t size);
-</pre></td>
-<td><pre>
-procedure Set_Max_Size
- (Value : in Natural);
+int alloc_array;
</pre></td>
+<td>Intentionally left unbound.</td>
</tr>
<tr>
<td><pre>
-static size_t max_size();
-</pre></td>
-<td><pre>
-function Get_Max_Size
- return Natural;
+const uchar * array;
</pre></td>
+<td>Intentionally left unbound.</td>
</tr>
</table>
@@ -73,7 +67,7 @@ function Get_Max_Size
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
@@ -101,6 +95,40 @@ function Create
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Static Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+static void max_size(size_t size);
+</pre></td>
+<td><pre>
+procedure Set_Max_Size
+ (Value : in Natural);
+</pre></td>
+ </tr>
+
+ <tr>
+<td><pre>
+static size_t max_size();
+</pre></td>
+<td><pre>
+function Get_Max_Size
+ return Natural;
+</pre></td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
virtual void color_average(Fl_Color c, float i);
@@ -148,7 +176,8 @@ procedure Desaturate
<tr>
<td><pre>
-virtual void draw(int X, int Y, int W, int H, int cx=0, int cy=0);
+virtual void draw(int X, int Y, int W, int H,
+ int cx=0, int cy=0);
</pre></td>
<td><pre>
procedure Draw
@@ -173,14 +202,14 @@ procedure Draw
<td><pre>
virtual void label(Fl_Widget *w);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
<td><pre>
virtual void label(Fl_Menu_Item *m);
</pre></td>
-<td>Not applicable as the original is marked as obsolete</td>
+<td>Marked as obsolete.</td>
</tr>
<tr>
diff --git a/doc/fl_shared_image.html b/doc/fl_shared_image.html
index 17885a5..1f8ae25 100644
--- a/doc/fl_shared_image.html
+++ b/doc/fl_shared_image.html
@@ -41,30 +41,121 @@
<td>Shared_Image_Reference</td>
</tr>
+ <tr>
+ <td>Fl_Shared_Handler</td>
+ <td>&nbsp;</td>
+ </tr>
+
</table>
<table class="function">
- <tr><th colspan="2">Static Functions and Procedures</th></tr>
+ <tr><th colspan="2">Static Protected Attributes</th></tr>
<tr>
<td><pre>
-static void add_handler(Fl_Shared_Handler f);
+static int alloc_handlers_ = 0;
</pre></td>
-<td>Documentation lacking, claims to be a test function yet used for adding extra formats?</td>
+<td>Intentionally left unbound.</td>
</tr>
<tr>
<td><pre>
-static Fl_Shared_Image * find(const char *name, int W=0, int H=0);
+static int alloc_images_ = 0;
</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
<td><pre>
-function Find
- (Name : in String;
- W, H : in Integer := 0)
- return Shared_Image;
+static Fl_Shared_Handler * handlers_ = 0;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+static Fl_Shared_Image ** images_ = 0;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+static int num_handlers_ = 0;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+static int num_images_ = 0;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Protected Attributes</th></tr>
+
+ <tr>
+<td><pre>
+int alloc_image_;
</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+Fl_Image * image_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+const char * name_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+int original_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+int refcount_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Constructors</th></tr>
+
+ <tr>
+<td><pre>
+Fl_Shared_Image();
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+Fl_Shared_Image(const char *n, Fl_Image *img=0);
+</pre></td>
+<td>Intentionally left unbound.</td>
</tr>
<tr>
@@ -97,6 +188,32 @@ static Fl_Shared_Image ** images();
<td>&nbsp;</td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Static Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+static void add_handler(Fl_Shared_Handler f);
+</pre></td>
+<td>Documentation lacking, claims to be a test function yet used for adding extra formats?</td>
+ </tr>
+
+ <tr>
+<td><pre>
+static Fl_Shared_Image * find(const char *name, int W=0, int H=0);
+</pre></td>
+<td><pre>
+function Find
+ (Name : in String;
+ W, H : in Integer := 0)
+ return Shared_Image;
+</pre></td>
+ </tr>
+
<tr>
<td><pre>
static int num_images();
@@ -178,7 +295,8 @@ procedure Desaturate
<tr>
<td><pre>
-virtual void draw(int X, int Y, int W, int H, int cx, int cy);
+virtual void draw(int X, int Y, int W, int H,
+ int cx, int cy);
</pre></td>
<td><pre>
procedure Draw
@@ -236,7 +354,7 @@ function Reference_Count
<td><pre>
void release();
</pre></td>
-<td>Used as destructor, handled automatically with Finalize procedure using Limited_Controlled types</td>
+<td>Used as destructor, handled automatically.</td>
</tr>
<tr>
@@ -276,6 +394,41 @@ procedure Uncache
</table>
+
+<table class="function">
+ <tr><th colspan="2">Static Protected Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+static int compare(Fl_Shared_Image **i0, Fl_Shared_Image **i1);
+</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Protected Functions and Procedures</th></tr>
+
+ <tr>
+<td><pre>
+void add();
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+void update();
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
</body>
</html>
diff --git a/doc/fl_text_buffer.html b/doc/fl_text_buffer.html
index 52b1349..5da799c 100644
--- a/doc/fl_text_buffer.html
+++ b/doc/fl_text_buffer.html
@@ -71,7 +71,55 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Static Attributes</th></tr>
+
+ <tr>
+<td><pre>
+static const char * file_encoding_warning_message;
+</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Attributes</th></tr>
+
+ <tr>
+<td><pre>
+int input_file_was_transcoded;
+</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+ <tr>
+<td><pre>
+void (*transcoding_warning_action)(Fl_Text_Buffer *);
+</pre></td>
+<td>&nbsp;</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Protected Attributes</th></tr>
+
+ <tr>
+<td colspan="2" style="text-align:center">
+Too many to list. None that look suited for public API usage.
+</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
@@ -85,9 +133,17 @@ function Create
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
-void add_modify_callback(Fl_Text_Modify_Cb bufModifiedCB, void *cbArg);
+void add_modify_callback(Fl_Text_Modify_Cb bufModifiedCB,
+ void *cbArg);
</pre></td>
<td><pre>
procedure Add_Modify_Callback
@@ -98,7 +154,8 @@ procedure Add_Modify_Callback
<tr>
<td><pre>
-void add_predelete_callback(Fl_Text_Predelete_Cb bufPredelCB, void *cbArg);
+void add_predelete_callback(Fl_Text_Predelete_Cb bufPredelCB,
+ void *cbArg);
</pre></td>
<td><pre>
procedure Add_Predelete_Callback
@@ -217,7 +274,8 @@ function Character_At
<tr>
<td><pre>
-void copy(Fl_Text_Buffer *fromBuf, int fromStart, int fromEnd, int toPos);
+void copy(Fl_Text_Buffer *fromBuf, int fromStart,
+ int fromEnd, int toPos);
</pre></td>
<td><pre>
procedure Copy
@@ -230,7 +288,8 @@ procedure Copy
<tr>
<td><pre>
-int count_displayed_characters(int lineStartPos, int targetPos) const;
+int count_displayed_characters(int lineStartPos,
+ int targetPos) const;
</pre></td>
<td><pre>
function Count_Displayed_Characters
@@ -254,7 +313,8 @@ function Count_Lines
<tr>
<td><pre>
-int findchar_backward(int startPos, unsigned int searchChar, int *foundPos) const;
+int findchar_backward(int startPos, unsigned int searchChar,
+ int *foundPos) const;
</pre></td>
<td><pre>
function Findchar_Backward
@@ -268,7 +328,8 @@ function Findchar_Backward
<tr>
<td><pre>
-int findchar_forward(int startPos, unsigned searchChar, int *foundPos) const;
+int findchar_forward(int startPos, unsigned searchChar,
+ int *foundPos) const;
</pre></td>
<td><pre>
function Findchar_Forward
@@ -437,7 +498,8 @@ int next_char_clipped(int ix) const;
<tr>
<td><pre>
-int outputfile(const char *file, int start, int end, int buflen=128*1024);
+int outputfile(const char *file, int start, int end,
+ int buflen=128*1024);
</pre></td>
<td><pre>
procedure Output_File
@@ -494,7 +556,8 @@ procedure Remove_Text
<tr>
<td><pre>
-void remove_modify_callback(Fl_Text_Modify_Cb bufModifiedCB, void *cbArg);
+void remove_modify_callback(Fl_Text_Modify_Cb bufModifiedCB,
+ void *cbArg);
</pre></td>
<td><pre>
procedure Remove_Modify_Callback
@@ -505,7 +568,8 @@ procedure Remove_Modify_Callback
<tr>
<td><pre>
-void remove_predelete_callback(Fl_Text_Predelete_Cb predelCB, void *cbArg);
+void remove_predelete_callback(Fl_Text_Predelete_Cb predelCB,
+ void *cbArg);
</pre></td>
<td><pre>
procedure Remove_Predelete_Callback
@@ -595,7 +659,8 @@ procedure Save_File
<tr>
<td><pre>
-int search_backward(int startPos, const char *searchString, int *foundPos, int matchCase=0) const;
+int search_backward(int startPos, const char *searchString,
+ int *foundPos, int matchCase=0) const;
</pre></td>
<td><pre>
function Search_Backward
@@ -610,7 +675,8 @@ function Search_Backward
<tr>
<td><pre>
-int search_forward(int startPos, const char *searchString, int *foundPos, int matchCase=0) const;
+int search_forward(int startPos, const char *searchString,
+ int *foundPos, int matchCase=0) const;
</pre></td>
<td><pre>
function Search_Forward
@@ -878,6 +944,13 @@ function Word_Start
</table>
+
+<table class="function">
+ <tr><th colspan="2">Protected Functions and Procedures</th></tr>
+
+</table>
+
+
</body>
</html>
diff --git a/doc/fl_tiled_image.html b/doc/fl_tiled_image.html
index 68dd848..39292b1 100644
--- a/doc/fl_tiled_image.html
+++ b/doc/fl_tiled_image.html
@@ -46,7 +46,28 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Protected Attributes</th></tr>
+
+ <tr>
+<td><pre>
+int alloc_image_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+ <tr>
+<td><pre>
+Fl_Image * image_;
+</pre></td>
+<td>Intentionally left unbound.</td>
+ </tr>
+
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
@@ -60,6 +81,13 @@ function Create
</pre></td>
</tr>
+</table>
+
+
+
+<table class="function">
+ <tr><th colspan="2">Functions and Procedures</th></tr>
+
<tr>
<td><pre>
virtual void color_average(Fl_Color c, float i);
diff --git a/doc/fl_xbm_image.html b/doc/fl_xbm_image.html
index ae56def..406f4a9 100644
--- a/doc/fl_xbm_image.html
+++ b/doc/fl_xbm_image.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
diff --git a/doc/fl_xpm_image.html b/doc/fl_xpm_image.html
index c8a8e38..827fa89 100644
--- a/doc/fl_xpm_image.html
+++ b/doc/fl_xpm_image.html
@@ -46,7 +46,7 @@
<table class="function">
- <tr><th colspan="2">Functions and Procedures</th></tr>
+ <tr><th colspan="2">Constructors</th></tr>
<tr>
<td><pre>
diff --git a/progress.txt b/progress.txt
index e962131..6a0c995 100644
--- a/progress.txt
+++ b/progress.txt
@@ -139,6 +139,7 @@ To-Do:
Fl_GDI_Graphics_Driver
Fl_GDI_Printer_Graphics_Driver
Fl_Glut_Window
+Fl_Positioner
Fl_Postscript_Graphics_Driver
Fl_Quartz_Graphics_Driver
Fl_Sys_Menu_Bar
@@ -171,12 +172,11 @@ Fl_Device_Plugin
Fl_Plugin
Fl_Plugin_Manager
-(XForms legacy compatibility) (why did I bind Fl_Chart/Fl_Clock then?)
+(XForms legacy compatibility) (why did I bind Fl_Chart/Fl_Clock/Fl_Positioner then?)
Fl_FormsBitmap
Fl_FormsPixmap
Fl_FormsText
Fl_Free
-Fl_Positioner
Fl_Timer
(docs explicitly say to use Fl_Printer instead)
@@ -193,3 +193,34 @@ GNAT bug with type_invariant combined with derived type and a begin section in a
Fl_Bitmap / Fl_XBM_Image instances will always have fail() return ERR_NO_IMAGE
+
+
+Non-widgets with incomplete APIs:
+
+FLTK
+FLTK.Devices.Graphics
+FLTK.Draw
+FLTK.Help_Dialogs (the Show_With_Args)
+FLTK.Images (static attributes, draw_empty, Get_Data_Size?)
+FLTK.Images.Bitmaps (attributes)
+FLTK.Images.Pixmaps (constructor)
+FLTK.Images.Shared (images(), compare)
+FLTK.Menu_Items
+FLTK.Text_Buffers
+
+
+
+Widgets with incomplete APIs:
+
+Widgets
+Widgets.Groups
+Widgets.Groups.Browsers.Check (Set_Checked)
+Widgets.Groups.Input_Choices (menu)
+Widgets.Groups.Scrolls (attributes, resize, type, protected)
+Widgets.Groups.Text_Displays
+Widgets.Groups.Text_Displays.Text_Editors
+Widgets.Groups.Windows
+Widgets.Menus
+Widgets.Valuators (format) (a few derivative classes need type() checked too)
+
+
diff --git a/src/fltk-environment.ads b/src/fltk-environment.ads
index be32eee..4bb807b 100644
--- a/src/fltk-environment.ads
+++ b/src/fltk-environment.ads
@@ -31,8 +31,6 @@ package FLTK.Environment is
type Binary_Data is array (Positive range <>) of Interfaces.Unsigned_8;
-
-
Preference_Error : exception;
diff --git a/src/fltk-help_dialogs.adb b/src/fltk-help_dialogs.adb
index 323fcab..c7cf870 100644
--- a/src/fltk-help_dialogs.adb
+++ b/src/fltk-help_dialogs.adb
@@ -142,9 +142,9 @@ package body FLTK.Help_Dialogs is
- -----------------------------------
- -- Controlled Type Subprograms --
- -----------------------------------
+ -------------------
+ -- Destructors --
+ -------------------
procedure Finalize
(This : in out Help_Dialog) is
@@ -158,9 +158,9 @@ package body FLTK.Help_Dialogs is
- -----------------------
- -- Help_Dialog API --
- -----------------------
+ --------------------
+ -- Constructors --
+ --------------------
package body Forge is
@@ -188,6 +188,10 @@ package body FLTK.Help_Dialogs is
+ -----------------------
+ -- API Subprograms --
+ -----------------------
+
procedure Show
(This : in out Help_Dialog) is
begin