aboutsummaryrefslogtreecommitdiff
path: root/doc/fl_draw.html
diff options
context:
space:
mode:
Diffstat (limited to 'doc/fl_draw.html')
-rw-r--r--doc/fl_draw.html12
1 files changed, 6 insertions, 6 deletions
diff --git a/doc/fl_draw.html b/doc/fl_draw.html
index 55b08bd..aca154a 100644
--- a/doc/fl_draw.html
+++ b/doc/fl_draw.html
@@ -419,8 +419,8 @@ procedure Draw_Image
Flip_Horizontal : in Boolean := False;
Flip_Vertical : in Boolean := False)
with Pre => (if Line_Size = 0
- then Data'Length >= W * H * Depth
- else Data'Length >= Line_Size * H);
+ then Data'Length >= Size_Type (W) * Size_Type (H) * Size_Type (Depth)
+ else Data'Length >= Size_Type (Line_Size) * Size_Type (H));
</pre></td>
</tr>
@@ -451,8 +451,8 @@ procedure Draw_Image_Mono
Flip_Horizontal : Boolean := False;
Flip_Vertical : Boolean := False)
with Pre => (if Line_Size = 0
- then Data'Length >= W * H * Depth
- else Data'Length >= Line_Size * H);
+ then Data'Length >= Size_Type (W) * Size_Type (H) * Size_Type (Depth)
+ else Data'Length >= Size_Type (Line_Size) * Size_Type (H));
</pre></td>
</tr>
@@ -916,8 +916,8 @@ function Read_Image
return Color_Component_Array
with Post =>
(if Alpha = 0
- then Read_Image'Result'Length = W * H * 3
- else Read_Image'Result'Length = W * H * 4);
+ then Read_Image'Result'Length = Size_Type (W) * Size_Type (H) * 3
+ else Read_Image'Result'Length = Size_Type (W) * Size_Type (H) * 4);
</pre></td>
</tr>