# HG changeset patch # User Matti Hamalainen # Date 1422003284 -7200 # Node ID d3ba5847cbda131297b7c36747acc81fd38f2491 # Parent d62280f2a9c7081c7281f18a48d459b4fb6e0397 calc: Update comment. diff -r d62280f2a9c7 -r d3ba5847cbda calc.tcl --- a/calc.tcl Fri Jan 23 10:50:21 2015 +0200 +++ b/calc.tcl Fri Jan 23 10:54:44 2015 +0200 @@ -37,7 +37,7 @@ # This is something rather perverse set equ [join [join $args ""] ""] - # Use 'expr' to calculate the result, but catch any exceptions / errors + # Use external binary to calculate the result, but catch any exceptions / errors if {[catch {set res [exec -- "/usr/local/bin/mfcalc" "$equ"]} uerrmsg]} { return $uerrmsg } else {