home *** CD-ROM | disk | FTP | other *** search
/ Practical Programming in Tcl & Tk (4th Edition) / TCLBOOK4.BIN / pc / exsource.old / 19_2.tcl < prev    next >
Text File  |  2003-04-15  |  303b  |  21 lines
  1. #
  2. # Example 19-2
  3. # Creating a hierarchy of interpreters.
  4. #
  5.  
  6. interp create foo
  7. #=> foo
  8. interp eval foo {interp create bar}
  9. #=> bar
  10. interp create {foo bar2}
  11. #=> foo bar2
  12. interp slaves
  13. #=> foo
  14. interp slaves foo
  15. #=> bar bar2
  16. interp delete bar
  17. #=> interpreter named "bar" not found
  18. interp delete {foo bar}
  19.  
  20.  
  21.