- Added code to read SANS TOF frames from a) files and b) from HM

- Fixed an bug causing core dumps on bad Tcl scripts
- Started on a syntax checker for SICS

nxdata.c

@@ -726,12 +726,8 @@
         NXclosedata(Nfil);
        
         /* histogram Length */
-        iStat = HistGetOption(pHist,"Length",pBuffer,131);
-        if(!iStat)
-        {
-          return 0;
-        }
-        iVal = atoi(pBuffer);
+	GetHistDim(pHist,iDim,&iVal);
+	iVal = iDim[0];
         if(iVal < 1)
         {
           return 0;
@@ -831,6 +827,10 @@
            SNputdata1att(Nfil,"sample_mur",NX_FLOAT32, 1,&pVar->fVal,
                         "Units","???");
         }
+	/* do a3 */
+        SNPutMotor(Nfil,pSics,pCon,"a3",
+                "sample_table_rotation","degree");
+          
         /* write sample environment here */
         pCom = FindCommand(pSics,"temperature");
         if(pCom)