home *** CD-ROM | disk | FTP | other *** search
/ Practical Programming in Tcl & Tk (4th Edition) / TCLBOOK4.BIN / pc / exsource / 4_3.tcl < prev    next >
Text File  |  2003-04-16  |  91b  |  11 lines

  1. #
  2. # Example 4-3
  3. # Comparing strings with eq.
  4. #
  5.  
  6. if {$s1 eq $s2} {
  7.     # strings are equal
  8. }
  9.  
  10.  
  11.