[rkward-cvs] SF.net SVN: rkward: [1955] trunk/rkward/rkward/core/rkvariable.cpp

[tfry at users.sourceforge.net]

Revision: 1955
          http://rkward.svn.sourceforge.net/rkward/?rev=1955&view=rev
Author:   tfry
Date:     2007-09-13 08:02:39 -0700 (Thu, 13 Sep 2007)

Log Message:
-----------
Keep logicals as logicals

Modified Paths:
--------------
    trunk/rkward/rkward/core/rkvariable.cpp

Modified: trunk/rkward/rkward/core/rkvariable.cpp
===================================================================
--- trunk/rkward/rkward/core/rkvariable.cpp	2007-09-13 14:46:53 UTC (rev 1954)
+++ trunk/rkward/rkward/core/rkvariable.cpp	2007-09-13 15:02:39 UTC (rev 1955)
@@ -499,6 +499,10 @@
 		return (rQuote (getLabeled (row)));
 	} else if (getDataType () == DataCharacter) {
 		return (rQuote (getText (row)));
+	} else if (getDataType () == DataLogical) {
+		RK_ASSERT (myData ()->cell_doubles != 0);
+		if (myData ()->cell_doubles[row] == 0) return ("FALSE");
+		else return ("TRUE");
 	} else {
 		RK_ASSERT (myData ()->cell_doubles != 0);
 		return (QString::number (myData ()->cell_doubles[row], 'g', MAX_PRECISION));


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.