summaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorsam <sam@138bc75d-0d04-0410-961f-82ee72b054a4>2007-11-14 15:14:45 +0000
committersam <sam@138bc75d-0d04-0410-961f-82ee72b054a4>2007-11-14 15:14:45 +0000
commit1ca2dbd8f9ff34b6db00c538f27d59dd57482f04 (patch)
tree03c6d247c52ad0823a91d1ba8170d4ad19ac232e /gcc
parent2dd515a3d9bad2a2ec8d83bef34205340647103f (diff)
downloadgcc-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/ChangeLog2
-rw-r--r--gcc/ada/i-cstrin.ads1
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