itypes.adb (Create_Itype): Use new name Access_Subprogram_Kind

2008-03-26  Robert Dewar  <dewar@adacore.com>

	* itypes.adb (Create_Itype): Use new name Access_Subprogram_Kind

	* sem_ch13.adb (Validate_Unchecked_Conversion): Give warning for
	unchecked conversion for different conventions only for subprogram
	pointers or on VMS.

From-SVN: r133570

gcc/ada/itypes.adb

@@ -68,7 +68,7 @@ package body Itypes is
          Set_Is_Frozen (Typ);
       end if;
 
-      if Ekind in Access_Subprogram_Type_Kind then
+      if Ekind in Access_Subprogram_Kind then
          Set_Can_Use_Internal_Rep (Typ, not Always_Compatible_Rep_On_Target);
       end if;