1 files changed, 18 insertions, 0 deletions
diff --git a/body/fltk.adb b/body/fltk.adb
index f302b47..d729364 100644
--- a/body/fltk.adb
+++ b/body/fltk.adb
@@ -122,6 +122,24 @@ package body FLTK is
 
 
 
+    function "+"
+           (Left, Right : in Alignment)
+        return Alignment is
+    begin
+        return Left or Right;
+    end "+";
+
+
+    function "-"
+           (Left, Right : in Alignment)
+        return Alignment is
+    begin
+        return Left and (not Right);
+    end "-";
+
+
+
+
     function Press
            (Key : in Pressable_Key)
         return Keypress is