unofficial mirror of guile-devel@gnu.org 
 help / color / mirror / Atom feed
* srfi-1 alist-delete equality proc arg order
@ 2004-12-05 23:47 Kevin Ryde
  0 siblings, 0 replies; only message in thread
From: Kevin Ryde @ 2004-12-05 23:47 UTC (permalink / raw)


[-- Attachment #1: Type: text/plain, Size: 192 bytes --]

I fixed a bug in alist-delete, it's supposed to have the target key as
the first argument to the equality test function.  That's in the spec
and the guile docs, but was the wrong way around.


[-- Attachment #2: srfi-1.scm.alist-delete.diff --]
[-- Type: text/plain, Size: 286 bytes --]

--- srfi-1.scm.~1.37.~	2004-12-05 17:16:10.000000000 +1100
+++ srfi-1.scm	2004-12-06 10:46:11.000000000 +1100
@@ -710,7 +710,7 @@
     (let lp ((a alist))
       (if (null? a)
 	'()
-	(if (k= (caar a) key)
+	(if (k= key (caar a))
 	  (lp (cdr a))
 	  (cons (car a) (lp (cdr a))))))))
 

[-- Attachment #3: Type: text/plain, Size: 143 bytes --]

_______________________________________________
Guile-devel mailing list
Guile-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-devel

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2004-12-05 23:47 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2004-12-05 23:47 srfi-1 alist-delete equality proc arg order Kevin Ryde

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).