diff --git a/apop_data.m4.c b/apop_data.m4.c
index 7f268569..15716d33 100644
--- a/apop_data.m4.c
+++ b/apop_data.m4.c
@@ -156,7 +156,7 @@ char apop_data_free_base(apop_data *freeme){
                                "This is not healthy. Not freeing; marking your data set with error='c'.");
         if (apop_data_free_base(freeme->more)) 
             Apop_stopif(freeme->more->error == 'c', freeme->error='c'; return 'c', 
-                                1, "Propogating error code to parent data set");
+                                1, "Propagating error code to parent data set");
     } 
     if (freeme->vector)  
         gsl_vector_free(freeme->vector);
diff --git a/eg/test_updating.c b/eg/test_updating.c
index d241fe7a..b51c2ff6 100644
--- a/eg/test_updating.c
+++ b/eg/test_updating.c
@@ -4,7 +4,7 @@
 void distances(gsl_vector *v1, gsl_vector *v2, double tol){
     double error = apop_vector_distance(v1, v2, .metric='m');
     double updated_size = apop_vector_sum(v1);
-    Apop_stopif(error/updated_size > tol, exit(1), 0, "The error is %g, which is too big.", error/updated_size);
+    Apop_stopif(error/updated_size > tol, exit(1), 0, "The error is %g, which is too big (> %g).", error/updated_size, tol);
 }
 
 int main(){
diff --git a/model/apop_loess.c b/model/apop_loess.c
index e0491d99..37f93b36 100644
--- a/model/apop_loess.c
+++ b/model/apop_loess.c
@@ -1216,7 +1216,7 @@ static void ehg127_(double *q, integer *n, integer *d__, integer *nf, double *f,
 
     ++execnt;
     if (execnt == 1)
-        machep = DBL_EPSILON;
+        machep = GSL_DBL_EPSILON;
     /*     sort by distance */
     for (i3 = 1; i3 <= *n; ++i3)
         dist[i3] = 0.;