diff options
| author | Samuel Tardieu <sam@rfc1149.net> | 2007-11-14 15:14:45 +0000 |
|---|---|---|
| committer | Samuel Tardieu <sam@gcc.gnu.org> | 2007-11-14 15:14:45 +0000 |
| commit | 1e992e163d7d21027523b764f02836646036e184 (patch) | |
| tree | 03c6d247c52ad0823a91d1ba8170d4ad19ac232e /gcc | |
| parent | c2f17e192e10ad20e9b3a79e45d51de212cedfbb (diff) | |
| download | gcc-1e992e163d7d21027523b764f02836646036e184.zip gcc-1e992e163d7d21027523b764f02836646036e184.tar.gz gcc-1e992e163d7d21027523b764f02836646036e184.tar.bz2 | |
i-cstrin.ads (chars_ptr): Make it a C convention type.
gcc/ada/
* i-cstrin.ads (chars_ptr): Make it a C convention type.
From-SVN: r130180
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 4f17de0..cefae39 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 5ea063a..5e3494e 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 |