SICS-785 Make sure that TCL does a floating point calc if a SICSvar float is used in a calculation.

2014-11-06 16:46:14 +11:00
parent 95ffc5673a
commit 8ad80f6fee
1 changed files with 1 additions and 1 deletions
--- a/sicvar.c
+++ b/sicvar.c
@ -456,7 +456,7 @@ int VarWrapper(SConnection * pCon, SicsInterp * pInterp, void *pData,
      return 1;
    case veFloat:
      VarGetFloat(pVar, &fVal);
-      snprintf(pBueffel,sizeof(pBueffel)-1, "%s = %g", argv[0], fVal);
+      snprintf(pBueffel,sizeof(pBueffel)-1, "%s = %#g", argv[0], fVal);
      SCWrite(pCon, pBueffel, eValue);
      DeleteTokenList(pList);
      return 1;