Skip to content

Instantly share code, notes, and snippets.

@rssh
Created October 10, 2013 09:50
Show Gist options
  • Save rssh/6915818 to your computer and use it in GitHub Desktop.
Save rssh/6915818 to your computer and use it in GitHub Desktop.
example of tcl expression with 'own' do-while
set x 1
do {
set d [expr ($s/$x - $x)/2]
while { $d != 0 }
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment