Browse files

Merge branch 'master' of http://github.com/pereckerdal/blackhole-libs

  • Loading branch information...
2 parents d6d0857 + cf80153 commit 3d2c163409a8d0330746bd34f2db243788c157f2 Álvaro Castro-Castilla committed May 27, 2010
Showing with 28 additions and 24 deletions.
  1. +28 −24 ds/tree.scm
View
52 ds/tree.scm
@@ -34,30 +34,34 @@
;; CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
;; SOFTWARE.
-
-(export tree?
- tree-size
- tree-min
- tree-max
- tree-fold
- tree-members
-
- tree-search
- tree-member?
-
- tree-add
- tree-delete
- tree-delete-min
- tree-delete-max
-
- tree-split<
- tree-split>
- tree-union
- tree-difference
- tree-intersection
-
- tree-rank
- tree-index)
+(cond-expand
+ (black-hole
+ (export tree?
+ tree-size
+ tree-min
+ tree-max
+ tree-fold
+ tree-members
+
+ tree-search
+ tree-member?
+
+ tree-add
+ tree-delete
+ tree-delete-min
+ tree-delete-max
+
+ tree-split<
+ tree-split>
+ tree-union
+ tree-difference
+ tree-intersection
+
+ tree-rank
+ tree-index))
+
+ (else
+ #f))
(define *tree-weight* 5)

0 comments on commit 3d2c163

Please sign in to comment.