diff options
Diffstat (limited to 'tksao')
| -rw-r--r-- | tksao/frame/base.C | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tksao/frame/base.C b/tksao/frame/base.C index c0fbfcd..60cfb4a 100644 --- a/tksao/frame/base.C +++ b/tksao/frame/base.C @@ -687,7 +687,8 @@ void Base::doubleToTclArray(double d, const char* var, str << base << "," << mod << ends; ostringstream vstr; - vstr << fixed << setw(9) << setprecision(3) << d << ends; + vstr << setprecision(8) << d << ends; + // vstr << fixed << setw(9) << setprecision(3) << d << ends; Tcl_SetVar2(interp, (char*)var, str.str().c_str(), vstr.str().c_str(), 0); } |