PageRenderTime 44ms CodeModel.GetById 19ms RepoModel.GetById 0ms app.codeStats 0ms

/tags/Root-branch-php-utl/SWIG/Examples/tcl/java/runme.tcl

#
TCL | 15 lines | 11 code | 4 blank | 0 comment | 0 complexity | f0cca9d2d0fbb7c2370ec049ff431f4b MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
  1. catch { load ./example[info sharedlibextension] example}
  2. JvCreateJavaVM NULL
  3. JvAttachCurrentThread NULL NULL
  4. Example e1 1
  5. Example e2 2
  6. puts "[e1 cget -mPublicInt]"
  7. puts "[e2 cget -mPublicInt]"
  8. puts "[e2 Add 1 2]"
  9. puts "[e2 Add 1.0 2.0]"
  10. puts "[e2 Add '1' '2']"
  11. JvDetachCurrentThread