.
original commit: d44ad9eaa256c21f280337da78c13be6707d5ff8
This commit is contained in:
parent
3017661e59
commit
e8856bc74c
|
@ -89,7 +89,7 @@
|
|||
[(l r equal?)
|
||||
(if (null? l)
|
||||
r
|
||||
(remove* (cdr l) (remove (car l) r equal?)))]
|
||||
(remove* (cdr l) (remove (car l) r equal?) equal?))]
|
||||
[(l r) (remove* l r equal?)])))
|
||||
|
||||
(define remq*
|
||||
|
|
Loading…
Reference in New Issue
Block a user