summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-groups-windows.ads
diff options
context:
space:
mode:
authorJed Barber <jjbarber@y7mail.com>2018-03-13 17:38:01 +1100
committerJed Barber <jjbarber@y7mail.com>2018-03-13 17:38:01 +1100
commit3f59b75f1bb14d0daa7d979617fd7318aaf89c7c (patch)
treec63f66cc5f5370ba2e1e289911d57d0115992750 /src/fltk-widgets-groups-windows.ads
parent9293541a882a64bcb21a845b085dc0fe4c72607c (diff)
Made all constructors non-inheritable
Diffstat (limited to 'src/fltk-widgets-groups-windows.ads')
-rw-r--r--src/fltk-widgets-groups-windows.ads20
1 files changed, 12 insertions, 8 deletions
diff --git a/src/fltk-widgets-groups-windows.ads b/src/fltk-widgets-groups-windows.ads
index 9d1cefc..3ea38c1 100644
--- a/src/fltk-widgets-groups-windows.ads
+++ b/src/fltk-widgets-groups-windows.ads
@@ -26,14 +26,18 @@ package FLTK.Widgets.Groups.Windows is
- function Create
- (X, Y, W, H : in Integer;
- Text : in String)
- return Window;
-
- function Create
- (W, H : in Integer)
- return Window;
+ package Forge is
+
+ function Create
+ (X, Y, W, H : in Integer;
+ Text : in String)
+ return Window;
+
+ function Create
+ (W, H : in Integer)
+ return Window;
+
+ end Forge;