diff options
author | sam <sam@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-11-14 15:14:45 +0000 |
---|---|---|
committer | sam <sam@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-11-14 15:14:45 +0000 |
commit | 1ca2dbd8f9ff34b6db00c538f27d59dd57482f04 (patch) | |
tree | 03c6d247c52ad0823a91d1ba8170d4ad19ac232e /gcc | |
parent | 2dd515a3d9bad2a2ec8d83bef34205340647103f (diff) | |
download | gcc-1ca2dbd8f9ff34b6db00c538f27d59dd57482f04.tar.gz |
gcc/ada/
* i-cstrin.ads (chars_ptr): Make it a C convention type.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@130180 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/ChangeLog | 2 | ||||
-rw-r--r-- | gcc/ada/i-cstrin.ads | 1 |
2 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 4f17de09053..cefae39a686 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -5,6 +5,8 @@ * s-osinte-interix.ads: Removed. + * i-cstrin.ads (chars_ptr): Make it a C convention type. + 2007-11-13 Samuel Tardieu <sam@rfc1149.net> * a-tasatt.adb: Add a comment at the beginning of the package diff --git a/gcc/ada/i-cstrin.ads b/gcc/ada/i-cstrin.ads index 5ea063ab0ef..5e3494ed1b6 100644 --- a/gcc/ada/i-cstrin.ads +++ b/gcc/ada/i-cstrin.ads @@ -97,6 +97,7 @@ package Interfaces.C.Strings is private type chars_ptr is access all Character; + pragma Convention (C, chars_ptr); pragma No_Strict_Aliasing (chars_ptr); -- Since this type is used for external interfacing, with the pointer |