From 146069952daa8d8a9017b57de18ce498e3cc0234 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Sun, 21 Aug 2011 17:33:48 +0000
Subject: [PATCH] avoid segfault when printing aout a nonexistant
 `ReferenceValue' (pzan)

---
 ChangeLog             | 4 ++++
 src/frontend/outitf.c | 6 +++---
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index b4aa6b8c2..d756dba37 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2011-08-21  Robert Larice
+ * src/frontend/outitf.c :
+   avoid segfault when printing aout a nonexistant `ReferenceValue' (pzan)
+
 2011-08-21  Holger Vogt
  * fftext.h, fftext.c, fftlib.c, fftlib.h: type long to int
    (patch by Robert)
diff --git a/src/frontend/outitf.c b/src/frontend/outitf.c
index 12d99e237..2ba14a7bb 100644
--- a/src/frontend/outitf.c
+++ b/src/frontend/outitf.c
@@ -494,7 +494,7 @@ OUTpData(void *plotPtr, IFvalue *refValue, IFvalue *valuePtr)
             /* we've already printed reference vec first */
             if (run->data[i].outIndex == -1) continue;
 #ifdef TCL_MODULE
-	    blt_add(i,refValue->rValue);
+	    blt_add(i, refValue ? refValue->rValue : NAN);
 #endif
 
             if (run->data[i].regular) {
@@ -564,10 +564,10 @@ OUTpData(void *plotPtr, IFvalue *refValue, IFvalue *valuePtr)
         if ((currclock-lastclock)>(0.25*CLOCKS_PER_SEC)) {
           if (run->isComplex) {
               fprintf(stderr, " Reference value : % 12.5e\r",
-                            refValue->cValue.real);
+                            refValue ? refValue->cValue.real : NAN);
           } else {
               fprintf(stderr, " Reference value : % 12.5e\r",
-                            refValue->rValue);
+                            refValue ? refValue->rValue : NAN);
           }
           lastclock = currclock;
         }