[gtkada] Gtk.Extra.Plot

[Manuel Op de Coul]

>Also, you didn't modify gtk-extra-plot.adb, not explained why this change 
is
>needed.

I don't know why the change was needed, I'm simply changing it back
to what it was and how it was right in my opinion.

--- gtk-extra-plot.ads  Wed Aug 06 10:36:35 2003
+++ gtk-extra-plot2.ads Wed Aug 06 10:41:07 2003
@@ -666,7 +666,7 @@
    procedure Axis_Set_Labels_Style
      (Plot      : access Gtk_Plot_Record;
       Axis      : Plot_Axis_Pos;
-      Style     : Gint;
+      Style     : Plot_Label_Style;
       Precision : Gint);
    --  Set the style of labels.
    --  This indicates whether the labels should be displayed as floating
@@ -677,7 +677,7 @@
    procedure Axis_Set_Labels_Numbers
      (Plot      : access Gtk_Plot_Record;
       Axis      : Plot_Axis_Pos;
-      Style     : Gint;
+      Style     : Plot_Label_Style;
       Precision : Gint) renames Axis_Set_Labels_Style;
    --  </doc_ignore>
 
--- gtk-extra-plot.adb  Wed Aug 06 11:07:31 2003
+++ gtk-extra-plot2.adb Wed Aug 06 11:10:51 2003
@@ -1962,7 +1962,7 @@
    procedure Axis_Set_Labels_Style
      (Plot      : access Gtk_Plot_Record;
       Axis      : Plot_Axis_Pos;
-      Style     : Gint;
+      Style     : Plot_Label_Style;
       Precision : Gint)
    is
       procedure Internal (P : System.Address;
@@ -1970,7 +1970,7 @@
                           Style, Precision : Gint);
       pragma Import (C, Internal, "gtk_plot_axis_set_labels_style");
    begin
-      Internal (Get_Object (Plot), Axis, Style, Precision);
+      Internal (Get_Object (Plot), Axis, Gint (Plot_Label_Style'Pos 
(Style)), Precision);
    end Axis_Set_Labels_Style;
 
    ----------------------

Manuel