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

Examples updated.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5206 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Art Yerkes 2003-10-25 06:24:43 +00:00
commit b770c69ebc
5 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

1
Examples/ocaml/simple/example_prog.ml
View file

@ -1,5 +1,6 @@
(* example_prog.ml *) (* example_prog.ml *)
open Swig
open Example open Example
(* Call our gcd() function *) (* Call our gcd() function *)

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

@ -1,5 +1,6 @@
(* This example was mostly lifted from the guile example directory *) (* This example was mostly lifted from the guile example directory *)
open Swig
open Example open Example
let y = "\205\177" let y = "\205\177"

6
Examples/ocaml/std_vector/example.i
View file

@ -8,10 +8,8 @@
%include stl.i %include stl.i
/* instantiate the required template specializations */ /* instantiate the required template specializations */
namespace std { %template(IntVector) std::vector<int>;
%template(IntVector) std::vector<int>; %template(DoubleVector) std::vector<double>;
%template(DoubleVector) std::vector<double>;
}
/* Let's just grab the original header file here */ /* Let's just grab the original header file here */
%include "example.h" %include "example.h"

1
Examples/ocaml/std_vector/runme.ml
View file

@ -1,5 +1,6 @@
(* This example was mostly lifted from the guile example directory *) (* This example was mostly lifted from the guile example directory *)
open Swig
open Example open Example
(* repeatedly invoke a procedure with v and an index as arguments *) (* repeatedly invoke a procedure with v and an index as arguments *)

1
Examples/ocaml/stl/runme.ml
View file

@ -1,5 +1,6 @@
(* This example was mostly lifted from the guile example directory *) (* This example was mostly lifted from the guile example directory *)
open Swig
open Example open Example
let v = new_StringVector C_void let v = new_StringVector C_void