This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Fix minor checking bug in alpha:function_value.c


Obvious patch.  Testcase is below.

WITH REPORT; USE REPORT;
PROCEDURE C IS

   TYPE ARRAY_4 IS ARRAY (1..10) OF BOOLEAN;
   OBJ_ARA_4 : ARRAY_4 := (1..10 => FALSE);
   VAR_ARA_4 : ARRAY_4 := (1..10 => TRUE);
   VAR_ARA_8 : ARRAY_4;

BEGIN
     VAR_ARA_8 := "NOT" (VAR_ARA_4);
     IF VAR_ARA_8 /= OBJ_ARA_4 THEN
        raise Program_Error;
     END IF;
END C;

2003-10-22  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>

	* config/alpha/alpha.c (function_value [ENABLE_CHECKING]): Don't call
	alpha_return_in_memory if no VALTYPE specified.

*** config/alpha/alpha.c	20 Oct 2003 07:59:45 -0000	1.334
--- config/alpha/alpha.c	22 Oct 2003 12:07:51 -0000
*************** function_value (tree valtype, tree func 
*** 6053,6057 ****
  
  #ifdef ENABLE_CHECKING
!   if (alpha_return_in_memory (valtype, func))
      abort ();
  #endif
--- 6053,6057 ----
  
  #ifdef ENABLE_CHECKING
!   if (valtype && alpha_return_in_memory (valtype, func))
      abort ();
  #endif


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]