From 9f8d01bebe01aee2537763bb441cfc6fb4371a8b Mon Sep 17 00:00:00 2001
From: Ferdi Franceschini <ffr@ansto.gov.au>
Date: Fri, 19 Sep 2014 14:53:06 +1000
Subject: [PATCH] SICS-785 Use scientific notation to return small floats in
 SICSvariables.

---
 sicvar.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sicvar.c b/sicvar.c
index be6d8e07..125277e4 100644
--- 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 = %f", argv[0], fVal);
+      snprintf(pBueffel,sizeof(pBueffel)-1, "%s = %g", argv[0], fVal);
       SCWrite(pCon, pBueffel, eValue);
       DeleteTokenList(pList);
       return 1;