* exp_vfpt.ads: Add ??? comment for last change

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135946 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ada/exp_vfpt.ads b/gcc/ada/exp_vfpt.ads
index 8bf02e7..fc73795 100644 (file)
--- a/gcc/ada/exp_vfpt.ads
+++ b/gcc/ada/exp_vfpt.ads
@@ -46,8 +46,10 @@ package Exp_VFpt is
    --  target type, or both, are Vax floating-point type.
 
    procedure Expand_Vax_Foreign_Return (N : Node_Id);
-   --  The node N is a call to a foreign function that returns a Vax
-   --  float value in a floating point register.
+   --  The node N is a call to a foreign function that returns a Vax float
+   --  value in a floating point register.
+   --  Yes, but what does it do??? there is no hint anywhere in the spec or
+   --  body comments, need full spec here ???
 
    procedure Expand_Vax_Real_Literal (N : Node_Id);
    --  The node N is a real literal node where the type is a Vax floating-point