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

swigp4-ify.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5236 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Art Yerkes 2003-11-01 08:20:26 +00:00
commit cb69624de9
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Examples/ocaml/std_string/runme.ml
View file

@ -13,10 +13,10 @@ let _ =
print_newline () ;
print_string "the new string contains " ;
print_int (get_int ((invoke z) "size" C_void)) ;
print_int (z -> size () as int) ;
print_string " : [ " ;
for i = 0 to pred (get_int ((invoke z) "size" C_void)) do
print_int (get_int ((invoke z) "[]" (C_int i))) ;
for i = 0 to (pred ((z -> size ()) as int)) do
print_int ((z '[i to int]) as int) ;
print_string "; " ;
done ;
print_string "]" ;