/trunk/Examples/ocaml/string_from_ptr/foolib.i

 1%module foolib
 2%{
 3static int foo( char **buf ) {
 4  *buf = "string from c";
 5  return 0;
 6}
 7%}
 8
 9%typemap(in,numinputs=0) char **buf (char *temp) {
10    $1 = &temp;
11}
12%typemap(argout) char **buf {
13    swig_result = caml_list_append(swig_result,caml_val_string((char *)*$1));
14}
15
16int foo( char **buf );