From e1841e6982a68ec90fc7c80901a98a66f21318b3 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Thu, 24 Nov 2011 22:43:52 -0800
Subject: * lib.c (getplist_f): New function.

* lib.h (getplist_f): Declared.

* match.c (v_collect, h_coll): Use getplist_f to distinguish
the case that :vars is explicitly specified as (). In this
case, no bindings escape from the collect.

* tests/008/soundex.txr: This test case broke due to using
:vars () and yet counting on the variable to exist.

* RELNOTES: Updated.
---
 RELNOTES | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'RELNOTES')

diff --git a/RELNOTES b/RELNOTES
index 810e8d0d..3058ee29 100644
--- a/RELNOTES
+++ b/RELNOTES
@@ -6,6 +6,10 @@
   - Fixed regression in source location tracking (line numbers
     shown in debugger and trace output).
 
+  - Fixed :vars () in collect/coll not working as intended.
+    This should prevent any bindings from being collected, and
+    allows iteration with collect without accumulating memory.
+
 
                                     TXR 043
                                    2011-11-23
-- 
cgit v1.2.3