/trunk/Examples/tcl/java/runme.tcl

# · TCL · 15 lines · 11 code · 4 blank · 0 comment · 0 complexity · f0cca9d2d0fbb7c2370ec049ff431f4b MD5 · raw file 

    

  1. catch { load ./example[info sharedlibextension] example}
    2. 

  2. 

  3. JvCreateJavaVM  NULL
    4. 

  4. JvAttachCurrentThread NULL NULL
    5. 

  5. Example e1 1
    6. 

  6. Example e2 2
    7. 

  7. 

  8. puts "[e1 cget -mPublicInt]"
    9. 

  9. puts "[e2 cget -mPublicInt]"
    10. 

  10. 

  11. puts "[e2 Add 1 2]"
    12. 

  12. puts "[e2 Add 1.0 2.0]"
    13. 

  13. puts "[e2 Add '1' '2']"
    14. 

  14. 

  15. JvDetachCurrentThread
    16.