[Guile-commits] 02/04: Fix scm_weak_table_refq for undefined default

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit 5a3bc32c9968a929158c2089b1bd65f922429f02
Author: Andy Wingo <address@hidden>
Date:   Sat Nov 26 16:07:30 2016 +0100

    Fix scm_weak_table_refq for undefined default
    
    * libguile/weak-table.c (scm_weak_table_refq): No need to default weak
      table result to #f; just use whatever was passed in.
---
 libguile/weak-table.c |    3 ---
 1 file changed, 3 deletions(-)

diff --git a/libguile/weak-table.c b/libguile/weak-table.c
index cd7d8c8..f6f8dd6 100644
--- a/libguile/weak-table.c
+++ b/libguile/weak-table.c
@@ -912,9 +912,6 @@ assq_predicate (SCM x, SCM y, void *closure)
 SCM
 scm_weak_table_refq (SCM table, SCM key, SCM dflt)
 {
-  if (SCM_UNBNDP (dflt))
-    dflt = SCM_BOOL_F;
-  
   return scm_c_weak_table_ref (table, scm_ihashq (key, -1),
                                assq_predicate, SCM_UNPACK_POINTER (key),
                                dflt);