add tcl+java example

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8140 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2005-12-30 11:59:54 +00:00 · 2005-12-30 11:59:54 +00:00 · b4e4fe23ca
commit b4e4fe23ca
parent ebcf1a041d
10 changed files with 144 additions and 13 deletions
--- a/Examples/tcl/java/runme.tcl
+++ b/Examples/tcl/java/runme.tcl
@ -0,0 +1,15 @@
+catch { load ./example[info sharedlibextension] example}
+
+JvCreateJavaVM  NULL
+JvAttachCurrentThread NULL NULL
+Example e1 1
+Example e2 2
+
+puts "[e1 cget -mPublicInt]"
+puts "[e2 cget -mPublicInt]"
+
+puts "[e2 Add 1 2]"
+puts "[e2 Add 1.0 2.0]"
+puts "[e2 Add '1' '2']"
+
+JvDetachCurrentThread