[Plplot-cvs] SF.net SVN: plplot:[12299] trunk/bindings/ada/plplot.adb

[<jb...@us...>]

Revision: 12299
          http://sourceforge.net/p/plplot/code/12299
Author:   jbauck
Date:     2013-03-20 00:33:32 +0000 (Wed, 20 Mar 2013)
Log Message:
-----------
Convert line width types that were Integer to Long_Float.

Modified Paths:
--------------
    trunk/bindings/ada/plplot.adb

Modified: trunk/bindings/ada/plplot.adb
===================================================================
--- trunk/bindings/ada/plplot.adb	2013-03-15 03:14:39 UTC (rev 12298)
+++ trunk/bindings/ada/plplot.adb	2013-03-20 00:33:32 UTC (rev 12299)
@@ -71,7 +71,7 @@
     
     -- Set default pen width. Docs don't say, so I'll make it 1.
     -- I could make this depend on the type of outut device used.
-    Default_Pen_Width : constant Integer := 1;
+    Default_Pen_Width : constant Long_Float := 1.0;
     procedure Set_Default_Pen_Width is
     begin
         Set_Pen_Width(Default_Pen_Width);
@@ -3312,7 +3312,7 @@
 
     -- Set pen width.
     -- plwidth
-    procedure Set_Pen_Width(Pen_Width : Integer) is
+    procedure Set_Pen_Width(Pen_Width : Long_Float) is
     begin
         plwidth(Pen_Width);
     end Set_Pen_Width;

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.