2009-11-30 Jerome Lambourg <lambourg@adacore.com>

[pf3gnuchains/gcc-fork.git] / gcc / ada / exp_ch3.adb

diff --git a/gcc/ada/exp_ch3.adb b/gcc/ada/exp_ch3.adb
index 13454c7..17e6395 100644 (file)
--- a/gcc/ada/exp_ch3.adb
+++ b/gcc/ada/exp_ch3.adb
@@ -8104,7 +8104,8 @@ package body Exp_Ch3 is
       elsif Restriction_Active (No_Finalization) then
          null;
 
-      --  We skip these for CIL Value types (why???)
+      --  We skip these for CIL Value types, where finalization is not
+      --  available
 
       elsif Is_Value_Type (Tag_Typ) then
          null;