X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fbinomial.c;h=8439a71b93919749c551f0abf75209a8d5f28452;hb=14f4522a17db23e67a6fa17876633cc6260cb42b;hp=94d0d9721e0b7f4c543d44a975ec8b8b9b7cbed0;hpb=5f91f0868ec7cdbdb7900a2cb6e876b467fb2a6e;p=pspp

diff --git a/src/language/stats/binomial.c b/src/language/stats/binomial.c
index 94d0d9721e..8439a71b93 100644
--- a/src/language/stats/binomial.c
+++ b/src/language/stats/binomial.c
@@ -1,5 +1,5 @@
 /* PSPP - a program for statistical analysis.
-   Copyright (C) 2006, 2009, 2010, 2011 Free Software Foundation, Inc.
+   Copyright (C) 2006, 2009, 2010, 2011, 2014 Free Software Foundation, Inc.
 
    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -18,6 +18,7 @@
 
 #include "language/stats/binomial.h"
 
+#include <float.h>
 #include <gsl/gsl_cdf.h>
 #include <gsl/gsl_randist.h>
 
@@ -202,7 +203,8 @@ binomial_execute (const struct dataset *ds,
 
 	  if ( bst->cutpoint != SYSMIS)
 	    {
-	      ds_put_format (&catstr[0], "<= %g", bst->cutpoint);
+	      ds_put_format (&catstr[0], "<= %.*g",
+                             DBL_DIG + 1, bst->cutpoint);
 	    }
           else
             {