1 files changed, 9 insertions, 12 deletions
diff --git a/src/fltk.adb b/src/fltk.adb
index ad70379..8970efd 100644
--- a/src/fltk.adb
+++ b/src/fltk.adb
@@ -1,9 +1,14 @@
 
 
-with Interfaces.C;
-with System;
-use type System.Address;
-use type Interfaces.C.unsigned_long;
+with
+
+    Interfaces.C,
+    System;
+
+use type
+
+    Interfaces.C.unsigned_long,
+    System.Address;
 
 
 package body FLTK is
@@ -32,8 +37,6 @@ package body FLTK is
     end Has_Valid_Ptr;
 
 
-
-
     procedure Initialize
            (This : in out Wrapper) is
     begin
@@ -65,8 +68,6 @@ package body FLTK is
     end "+";
 
 
-
-
     function "+"
            (Left  : in Modifier_Key;
             Right : in Pressable_Key)
@@ -79,8 +80,6 @@ package body FLTK is
     end "+";
 
 
-
-
     function "+"
            (Left  : in Modifier_Key;
             Right : in Shortcut_Key)
@@ -104,8 +103,6 @@ package body FLTK is
     end Key_To_C;
 
 
-
-
     function C_To_Key
            (Key : in Interfaces.C.unsigned_long)
         return Shortcut_Key is