jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fragment fixes

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10159 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2007-11-20 21:46:01 +00:00
commit cd77efc220
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Lib/ocaml/cstring.i
View file

@ -10,8 +10,6 @@
* some way. * some way.
* ----------------------------------------------------------------------------- */ * ----------------------------------------------------------------------------- */
%include <fragments.i>
/* %cstring_input_binary(TYPEMAP, SIZE) /* %cstring_input_binary(TYPEMAP, SIZE)
* *
* Macro makes a function accept binary string data along with * Macro makes a function accept binary string data along with
@ -39,7 +37,7 @@
%typemap(ignore) TYPEMAP(char temp[MAX+1]) { %typemap(ignore) TYPEMAP(char temp[MAX+1]) {
$1 = ($1_ltype) temp; $1 = ($1_ltype) temp;
} }
%typemap(argout,fragment="t_output_helper") TYPEMAP { %typemap(argout) TYPEMAP {
$1[MAX] = 0; $1[MAX] = 0;
$result = caml_list_append($result,caml_val_string(str)); $result = caml_list_append($result,caml_val_string(str));
} }