[Ada] Minor whitespaces fixes in ada/decl.c

[bosch@gnat.com]

Minor whitespace changes. Tested with build on GNU Linux/x86.

  -Geert

2001-10-30  Geert Bosch <bosch@gnat.com>

	* decl.c: Minor whitespace fixes.

*** decl.c	Mon Oct 29 12:30:25 2001
--- decl.c	Tue Oct 30 15:30:06 2001
***************
*** 2,8 ****
   *                                                                          *
   *                         GNAT COMPILER COMPONENTS                         *
   *                                                                          *
!  *                                 D E C L                                   *
   *                                                                          *
   *                          C Implementation File                           *
   *                                                                          *
--- 2,8 ----
   *                                                                          *
   *                         GNAT COMPILER COMPONENTS                         *
   *                                                                          *
!  *                                 D E C L                                  *
   *                                                                          *
   *                          C Implementation File                           *
   *                                                                          *
***************
*** 720,726 ****
  							  "UNC"));
  	}
  
- 
  	/* Convert the expression to the type of the object except in the
  	   case where the object's type is unconstrained or the object's type
  	   is a padded record whose field is of self-referential size.  In
--- 720,725 ----
***************
*** 1524,1530 ****
  					size_binop (MINUS_EXPR, gnu_base_max,
  						    gnu_base_min)));
  
- 
  	    TYPE_NAME (gnu_index_types[index])
  	      = create_concat_name (gnat_entity, field_name);
  	  }
--- 1523,1528 ----
***************
*** 1636,1642 ****
  			  debug_info_p);
  	rest_of_type_compilation (gnu_fat_type, global_bindings_p ());
  
- 
  	/* Create a record type for the object and its template and
  	   set the template at a negative offset.  */
  	tem = build_unc_object_type (gnu_template_type, tem,
--- 1634,1639 ----
***************
*** 4288,4294 ****
      gnu_expr = build (COMPONENT_REF, TREE_TYPE (gnu_expr),
  		      build (PLACEHOLDER_EXPR, DECL_CONTEXT (gnu_expr)),
  		      gnu_expr);
- 
  
    /* If GNU_EXPR is neither a placeholder nor a constant, nor a variable
       that is a constant, make a variable that is initialized to contain the
--- 4285,4290 ----