1 files changed, 4 insertions, 0 deletions
diff --git a/src/fltk.ads b/src/fltk.ads
index 91a7b94..025fe16 100644
--- a/src/fltk.ads
+++ b/src/fltk.ads
@@ -24,6 +24,7 @@ package FLTK is
 
 
     type Color is new Natural;
+    No_Color : constant Color;
 
 
     type Alignment is private;
@@ -213,6 +214,9 @@ private
            (This : in out Wrapper);
 
 
+    No_Color : constant Color := 0;
+
+
     type Alignment is new Interfaces.Unsigned_16;
     Align_Center : constant Alignment := 0;
     Align_Top    : constant Alignment := 1;