Passing a String to a C/C++ Subprogram (Special Case)

[Eryndlia Mavourneen <eryndlia@gmail.com>]

I have a couple of strings that are bounded; that is, they are essentially fixed-length strings, and I need to pass them as "in" parameters to a subprogram that may or may not be written in C/C++.  I don't really want to hassle with the Interfaces packages for this, since the subprogram language is indefinite, and the strings are part of a package that many others likely will want to use, and the strings most likely will be used as standard Ada fixed-length strings.

Q: Is there any reason that I cannot just declare each of them in this way, assuming the subprogram is written in C/C++:

     . . .
        A_String : String (1 .. 30);
        pragma Convention (C, A_String);
        . . .
        procedure C_Prog (C_String : in String);
        pragma Import (Entity => C_Prog, ...);
     begin
        C_Prog (C_String => A_String);
     . . .

and have it work properly?

This method, of course, leaves it up to the client developer to insert any necessary nul characters to terminate the string, if is is smaller than the declared bound.

-- Eryndlia Mavourneen (KK1T)