Blob Blame History Raw
To: vim-dev@vim.org
Subject: Patch 7.0.015
Fcc: outbox
From: Bram Moolenaar <Bram@moolenaar.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
------------

Patch 7.0.015
Problem:    Athena: compilation problems with modern compiler.
Solution:   Avoid type casts for lvalue. (Alexey Froloff)
Files:	    src/gui_at_fs.c


*** ../vim-7.0.014/src/gui_at_fs.c	Wed May 10 15:22:49 2006
--- src/gui_at_fs.c	Fri May 12 11:26:24 2006
***************
*** 1861,1887 ****
      XtPointer	pnew;
  {
      SFDir	*dir;
!     int		nw;
  
      dir = &(SFdirs[SFdirPtr + (int)(long)n]);
  
  #ifdef FEAT_GUI_NEXTAW
!     if ((int)(long)pnew < 0)
      {
! 	if ((int)(long)pnew > -SFvScrollHeight)
! 	    (int)(long)pnew = -1;
  	else
! 	    (int)(long)pnew = -SFlistSize;
      }
!     else if ((int)(long)pnew > 0)
      {
! 	if ((int)(long)pnew < SFvScrollHeight)
! 	    (int)(long)pnew = 1;
  	else
! 	    (int)(long)pnew = SFlistSize;
      }
  #endif
!     nw = dir->vOrigin + (int)(long)pnew;
  
      if (nw > dir->nEntries - SFlistSize)
  	nw = dir->nEntries - SFlistSize;
--- 1861,1887 ----
      XtPointer	pnew;
  {
      SFDir	*dir;
!     int		nw = (int)(long)pnew;
  
      dir = &(SFdirs[SFdirPtr + (int)(long)n]);
  
  #ifdef FEAT_GUI_NEXTAW
!     if (nw < 0)
      {
! 	if (nw > -SFvScrollHeight)
! 	    nw = -1;
  	else
! 	    nw = -SFlistSize;
      }
!     else if (nw > 0)
      {
! 	if (nw < SFvScrollHeight)
! 	    nw = 1;
  	else
! 	    nw = SFlistSize;
      }
  #endif
!     nw += dir->vOrigin;
  
      if (nw > dir->nEntries - SFlistSize)
  	nw = dir->nEntries - SFlistSize;
***************
*** 1941,1967 ****
      XtPointer	pnew;
  {
      SFDir	*dir;
!     int		nw;
  
      dir = &(SFdirs[SFdirPtr + (int)(long)n]);
  
  #ifdef FEAT_GUI_NEXTAW
!     if ((int)(long)pnew < 0)
      {
! 	if ((int)(long)pnew > -SFhScrollWidth)
! 	    (int)(long)pnew = -1;
  	else
! 	    (int)(long)pnew = -SFcharsPerEntry;
      }
!     else if ((int)(long)pnew > 0)
      {
! 	if ((int)(long)pnew < SFhScrollWidth)
! 	    (int)(long)pnew = 1;
  	else
! 	    (int)(long)pnew = SFcharsPerEntry;
      }
  #endif
!     nw = dir->hOrigin + (int)(long)pnew;
  
      if (nw > dir->nChars - SFcharsPerEntry)
  	nw = dir->nChars - SFcharsPerEntry;
--- 1941,1967 ----
      XtPointer	pnew;
  {
      SFDir	*dir;
!     int		nw = (int)(long)pnew;
  
      dir = &(SFdirs[SFdirPtr + (int)(long)n]);
  
  #ifdef FEAT_GUI_NEXTAW
!     if (nw < 0)
      {
! 	if (nw > -SFhScrollWidth)
! 	    nw = -1;
  	else
! 	    nw = -SFcharsPerEntry;
      }
!     else if (nw > 0)
      {
! 	if (nw < SFhScrollWidth)
! 	    nw = 1;
  	else
! 	    nw = SFcharsPerEntry;
      }
  #endif
!     nw += dir->hOrigin;
  
      if (nw > dir->nChars - SFcharsPerEntry)
  	nw = dir->nChars - SFcharsPerEntry;
***************
*** 2038,2063 ****
      XtPointer	client_data;
      XtPointer	pnew;
  {
!     int		nw;
      float	f;
  
  #ifdef FEAT_GUI_NEXTAW
!     if ((int)(long)pnew < 0)
      {
! 	if ((int)(long)pnew > -SFpathScrollWidth)
! 	    (int)(long)pnew = -1;
  	else
! 	    (int)(long)pnew = -3;
      }
!     else if ((int)(long)pnew > 0)
      {
! 	if ((int)(long)pnew < SFpathScrollWidth)
! 	    (int)(long)pnew = 1;
  	else
! 	    (int)(long)pnew = 3;
      }
  #endif
!     nw = SFdirPtr + (int)(long)pnew;
  
      if (nw > SFdirEnd - 3)
  	nw = SFdirEnd - 3;
--- 2038,2063 ----
      XtPointer	client_data;
      XtPointer	pnew;
  {
!     int		nw = (int)(long)pnew;
      float	f;
  
  #ifdef FEAT_GUI_NEXTAW
!     if (nw < 0)
      {
! 	if (nw > -SFpathScrollWidth)
! 	    nw = -1;
  	else
! 	    nw = -3;
      }
!     else if (nw > 0)
      {
! 	if (nw < SFpathScrollWidth)
! 	    nw = 1;
  	else
! 	    nw = 3;
      }
  #endif
!     nw += SFdirPtr;
  
      if (nw > SFdirEnd - 3)
  	nw = SFdirEnd - 3;
*** ../vim-7.0.014/src/version.c	Fri May 12 19:24:33 2006
--- src/version.c	Fri May 12 19:25:57 2006
***************
*** 668,669 ****
--- 668,671 ----
  {   /* Add new patch number below this line */
+ /**/
+     15,
  /**/

-- 
hundred-and-one symptoms of being an internet addict:
127. You bring your laptop and cellular phone to church.

 /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
\\\        download, build and distribute -- http://www.A-A-P.org        ///
 \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///