X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Froc.c;fp=src%2Flanguage%2Fstats%2Froc.c;h=88f954044f2122c6ae64be9f20093719b522de13;hb=43513ffd3bd31a0a26c007715a87f846a579afaa;hp=eae528a38a81c126b30c5ffa9a66b93212293011;hpb=2fe0749f0892964767cefadb5fac1c9784e9df84;p=pspp-builds.git

diff --git a/src/language/stats/roc.c b/src/language/stats/roc.c
index eae528a3..88f95404 100644
--- a/src/language/stats/roc.c
+++ b/src/language/stats/roc.c
@@ -640,6 +640,13 @@ do_roc (struct cmd_roc *roc, struct casereader *input, struct dictionary *dict)
       n_neg = process_negative_group (var, neg, dict, &rs[i]);
 
 
+      printf ("Positives:\n");
+      dump_casereader (n_pos);
+
+      printf ("Negatives:\n");
+      dump_casereader (n_neg);
+
+#if 0
       /* Simple join on VALUE */
       for ( ; (cpos = casereader_read (n_pos) ); case_unref (cpos))
 	{
@@ -690,6 +697,7 @@ do_roc (struct cmd_roc *roc, struct casereader *input, struct dictionary *dict)
 	  rs[i].q2hat /= rs[i].n1 * pow2 (rs[i].n2);
 	}
     }
+#endif
 
   casereader_destroy (positives);
   casereader_destroy (negatives);