home *** CD-ROM | disk | FTP | other *** search
/ Practical Programming in Tcl & Tk (4th Edition) / TCLBOOK4.BIN / pc / exsource / 13_10.tcl < prev    next >
Text File  |  2003-04-16  |  290b  |  30 lines
  1. #
  2. # Example 13-10
  3. # Interactive history usage.
  4. #
  5.  
  6. % set a 5
  7. 5
  8. % set a [expr $a+7]
  9. 12
  10. % history
  11.     1 set a 5
  12.     2 set a [expr $a+7]
  13.     3 history
  14. % !2
  15. 19
  16. % !!
  17. 26
  18. % ^7^13
  19. 39
  20. % !h
  21.     1 set a 5
  22.     2 set a [expr $a+7]
  23.     3 history
  24.     4 set a [expr $a+7]
  25.     5 set a [expr $a+7]
  26.     6 set a [expr $a+13]
  27.     7 history
  28.  
  29.  
  30.