From bbc0b64c43cf07f490d10fa83323bf9bf88ce51b Mon Sep 17 00:00:00 2001
From: cvs <cvs>
Date: Thu, 9 Jan 2003 07:58:19 +0000
Subject: [PATCH] - Debugging amor problem

---
 amorstat.c | 8 +++++---
 danu.dat   | 2 +-
 o2t.c      | 8 +++++++-
 topsir.tcl | 2 ++
 4 files changed, 15 insertions(+), 5 deletions(-)

diff --git a/amorstat.c b/amorstat.c
index 139a45ea..539993ef 100644
--- a/amorstat.c
+++ b/amorstat.c
@@ -588,6 +588,7 @@
      int iMax = -999999;
      const float *timebin;
      HistInt *iData = NULL;
+     int iStart;
 
      /* get size of our problem */
      GetHistDim(self->pHM,iDim,&i3);
@@ -610,11 +611,12 @@
 
      if(isSINQHMDriv(self->pHM->pDriv))
      {
-       GetHistogramDirect(self->pHM,pCon,0,iDim[0]*iDim[1]*iDim[2],
-			  2*iDim[2],&iData[1],2*iDim[2]*sizeof(HistInt));
+       iStart = iDim[0]*iDim[1]*iDim[2];
+       GetHistogramDirect(self->pHM,pCon,0,iStart,
+			  iStart + 2*iDim[2],&iData[1],2*iDim[2]*sizeof(HistInt));
        for(i = 1; i < length; i++)
        {
-	 iData[i] = htonl(iData[i]); 
+         iData[i] = htonl(iData[i]);
        }
      } 
      else
diff --git a/danu.dat b/danu.dat
index 5d94bbff..0636addb 100644
--- a/danu.dat
+++ b/danu.dat
@@ -1,3 +1,3 @@
- 245 
+ 257 
 NEVER, EVER modify or delete this file
 You'll risk eternal damnation and a reincarnation as a cockroach!|n
\ No newline at end of file
diff --git a/o2t.c b/o2t.c
index d00e2ae3..1f744da7 100644
--- a/o2t.c
+++ b/o2t.c
@@ -211,7 +211,13 @@
     
     /* get and check drivabels */
     pCom = FindCommand(pSics,omega);
-    pDum = pCom->pData;
+    if(pCom != NULL)
+    {
+       pDum = pCom->pData;
+    } else
+    {
+      pDum = NULL;
+    }
     if(GetDrivableInterface(pDum) != NULL){
       self->pOmega = pDum;
     }
diff --git a/topsir.tcl b/topsir.tcl
index 512c2259..cb5edb06 100644
--- a/topsir.tcl
+++ b/topsir.tcl
@@ -125,3 +125,5 @@ Publish ScanCounts Spy
 Publish TextStatus Spy
 Publish otUnknown User
 MakeRuenBuffer
+MakeXYTable table
+