aboutsummaryrefslogtreecommitdiff
path: root/doc/fl_rgb_image.html
diff options
context:
space:
mode:
Diffstat (limited to 'doc/fl_rgb_image.html')
-rw-r--r--doc/fl_rgb_image.html58
1 files changed, 49 insertions, 9 deletions
diff --git a/doc/fl_rgb_image.html b/doc/fl_rgb_image.html
index 1e115d5..6d5427d 100644
--- a/doc/fl_rgb_image.html
+++ b/doc/fl_rgb_image.html
@@ -59,7 +59,42 @@ int alloc_array;
<td><pre>
const uchar * array;
</pre></td>
-<td>Intentionally left unbound.</td>
+<td><pre>
+function Data_Size
+ (This : in RGB_Image)
+ return Size_Type;
+
+function Get_Datum
+ (This : in RGB_Image;
+ Place : in Positive_Size)
+ return Color_Component
+with Pre => Place <= This.Data_Size;
+
+procedure Set_Datum
+ (This : in out RGB_Image;
+ Place : in Positive_Size;
+ Value : in Color_Component)
+with Pre => Place <= This.Data_Size;
+
+function Slice
+ (This : in RGB_Image;
+ Low : in Positive_Size;
+ High : in Size_Type)
+ return Color_Component_Array
+with Pre => High <= This.Data_Size,
+ Post => Slice'Result'Length = Size_Type'Max (0, High - Low + 1);
+
+procedure Overwrite
+ (This : in out RGB_Image;
+ Place : in Positive_Size;
+ Values : in Color_Component_Array)
+with Pre => Place + Values'Length - 1 <= This.Data_Size;
+
+function All_Data
+ (This : in RGB_Image)
+ return Color_Component_Array
+with Post => All_Data'Result'Length = This.Data_Size;
+</pre></td>
</tr>
</table>
@@ -71,15 +106,20 @@ const uchar * array;
<tr>
<td><pre>
-Fl_RGB_Image(const uchar *bits, int W, int H, int D=3, int LD=0);
+Fl_RGB_Image(const uchar *bits, int W, int H,
+ int D=3, int LD=0);
</pre></td>
<td><pre>
function Create
(Data : in Color_Component_Array;
Width, Height : in Natural;
Depth : in Natural := 3;
- Line_Data : in Natural := 0)
- return RGB_Image;
+ Line_Size : in Natural := 0)
+ return RGB_Image
+with Pre => (if Line_Size = 0
+ then Data'Length >= Size_Type (Width) * Size_Type (Height) * Size_Type (Depth)
+ else Data'Length >= Size_Type (Line_Size) * Size_Type (Height))
+ and Data'Length <= Get_Max_Size;
</pre></td>
</tr>
@@ -108,7 +148,7 @@ static void max_size(size_t size);
</pre></td>
<td><pre>
procedure Set_Max_Size
- (Value : in Natural);
+ (Value : in Size_Type);
</pre></td>
</tr>
@@ -118,7 +158,7 @@ static size_t max_size();
</pre></td>
<td><pre>
function Get_Max_Size
- return Natural;
+ return Size_Type;
</pre></td>
</tr>
@@ -181,9 +221,9 @@ virtual void draw(int X, int Y, int W, int H,
</pre></td>
<td><pre>
procedure Draw
- (This : in RGB_Image;
- X, Y, W, H : in Integer;
- CX, CY : in Integer := 0);
+ (This : in RGB_Image;
+ X, Y, W, H : in Integer;
+ Clip_X, Clip_Y : in Integer := 0);
</pre></td>
</tr>