diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-26 15:51:48 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-26 15:51:48 +0000 |
| commit | c8e14c4c695aeba8e93da7df7a8af50e0f44fe3b (patch) | |
| tree | 9b37d740ee79079d5b4cf17c366d0c324117e0c5 | |
| parent | 5c59467f3ba6c229d14b986e66055af3ce06cb59 (diff) | |
| download | ppe42-gcc-c8e14c4c695aeba8e93da7df7a8af50e0f44fe3b.tar.gz ppe42-gcc-c8e14c4c695aeba8e93da7df7a8af50e0f44fe3b.zip | |
* 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
| -rw-r--r-- | gcc/ada/exp_vfpt.ads | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/exp_vfpt.ads b/gcc/ada/exp_vfpt.ads index 8bf02e79fd8..fc73795cd55 100644 --- 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 |
