DEFINITION MODULE FOR "C" CStrTest;
(* C ABI test interface: C strings in results and char ** outputs. *)

FROM CStr IMPORT CString;

EXPORT UNQUALIFIED m2_cstr_hello, m2_cstr_out, m2_cstr_fill;

PROCEDURE m2_cstr_hello () : CString;
PROCEDURE m2_cstr_out (VAR p : CString);
PROCEDURE m2_cstr_fill (VAR buf : ARRAY OF CHAR;
                        cap : CARDINAL) : CARDINAL;

END CStrTest.