Commit 6e96b543 by Arnaud Charlet

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

From-SVN: r135946
parent fda528a8
...@@ -46,8 +46,10 @@ package Exp_VFpt is ...@@ -46,8 +46,10 @@ package Exp_VFpt is
-- target type, or both, are Vax floating-point type. -- target type, or both, are Vax floating-point type.
procedure Expand_Vax_Foreign_Return (N : Node_Id); procedure Expand_Vax_Foreign_Return (N : Node_Id);
-- The node N is a call to a foreign function that returns a Vax -- The node N is a call to a foreign function that returns a Vax float
-- float value in a floating point register. -- 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); procedure Expand_Vax_Real_Literal (N : Node_Id);
-- The node N is a real literal node where the type is a Vax floating-point -- The node N is a real literal node where the type is a Vax floating-point
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment