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