svn commit: r348141 - head/devel/gps/files

[John Marino]

Author: marino
Date: Thu Mar 13 23:10:04 2014
New Revision: 348141
URL: http://svnweb.freebsd.org/changeset/ports/348141
QAT: https://qat.redports.org/buildarchive/r348141/

Log:
  devel/gps: More tweaks to prepare for gcc49
  
  GCC had a couple of "ambiguous" complaints as well as an overlapping
  variable used for both in and out.  Fix these nits before gcc49 comes in.

Added:
  head/devel/gps/files/patch-src__editor_src_src__editor__buffer.adb   (contents, props changed)
  head/devel/gps/files/patch-src__editor_src_src__editor__view.adb   (contents, props changed)

Added: head/devel/gps/files/patch-src__editor_src_src__editor__buffer.adb
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/devel/gps/files/patch-src__editor_src_src__editor__buffer.adb	Thu Mar 13 23:10:04 2014	(r348141)
@@ -0,0 +1,11 @@
+--- src_editor/src/src_editor_buffer.adb.orig	2012-09-28 15:42:43.000000000 +0000
++++ src_editor/src/src_editor_buffer.adb
+@@ -5820,7 +5820,7 @@ package body Src_Editor_Buffer is
+ 
+          while Result
+            and then not Ends_Line (Iter)
+-           and then Is_Space (Get_Char (Iter))
++           and then Glib.Unicode.Is_Space (Gtk.Text_Iter.Get_Char (Iter))
+          loop
+             Forward_Char (Iter, Result);
+             Offset := Offset + 1;

Added: head/devel/gps/files/patch-src__editor_src_src__editor__view.adb
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/devel/gps/files/patch-src__editor_src_src__editor__view.adb	Thu Mar 13 23:10:04 2014	(r348141)
@@ -0,0 +1,19 @@
+--- src_editor/src/src_editor_view.adb.orig	2012-07-02 09:23:20.000000000 +0000
++++ src_editor/src/src_editor_view.adb
+@@ -1789,6 +1789,7 @@ package body Src_Editor_View is
+    is
+       View         : constant Source_View := Source_View (Widget);
+       Dummy_Gint   : Gint;
++      Dummy2_Gint  : Gint;
+       W, H, D      : Gint;
+       Button_Y     : Gint;
+       Lower, Upper : Gdouble;
+@@ -1807,7 +1808,7 @@ package body Src_Editor_View is
+          Button_Y := Gint (Get_Y (Event));
+ 
+          Get_Geometry
+-           (Get_Window (View.Area), Dummy_Gint, Dummy_Gint, W, H, D);
++           (Get_Window (View.Area), Dummy_Gint, Dummy2_Gint, W, H, D);
+ 
+          Adj := Get_Vadjustment (View.Scroll);
+          Lower := Get_Lower (Adj);