From 47594a07e2d973a95567d1611ffd805d4ba43d7b Mon Sep 17 00:00:00 2001 From: stibear Date: Tue, 11 Feb 2014 21:52:36 +0900 Subject: [PATCH] implemented Set operations on lists --- piclib/srfi/1.scm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/piclib/srfi/1.scm b/piclib/srfi/1.scm index 51430e73..2badd58d 100644 --- a/piclib/srfi/1.scm +++ b/piclib/srfi/1.scm @@ -765,6 +765,13 @@ (values (apply lset-difference! = list lists) (lset-intersection! = list (apply lset-union! lists)))) + (export lset<= lset= lset-adjoin + lset-union lset-union! + lset-intersection lset-intersection! + lset-difference lset-difference! + lset-xor lset-xor! + lset-diff+intersection lset-diff+intersection!) + ;; # Primitive side-effects ;; set-car! set-cdr! (export set-car! set-cdr!))