jackfirth / rebellion

A collection of core libraries for Racket
https://pkgs.racket-lang.org/package/rebellion
Apache License 2.0
80 stars 16 forks source link

mutable-red-black-node-color: contract violation #509

Closed sorawee closed 2 years ago

sorawee commented 2 years ago

Running https://github.com/sorawee/pareto-frontier/blob/master/test.rkt results in:

mutable-red-black-node-color: contract violation
  expected: mutable-red-black-node?
  given: #f

EDITED: making the program more minimal

#lang racket

(require rebellion/base/comparator
         rebellion/collection/sorted-set)

(define *set* (make-mutable-sorted-set #:comparator real<=>))

(sorted-set-add! *set* 49)
(sorted-set-add! *set* 68)
(sorted-set-add! *set* 80)
(sorted-set-add! *set* 53)
(sorted-set-add! *set* 27)
(sorted-set-add! *set* 34)
(sorted-set-add! *set* 48)
(sorted-set-remove! *set* 68)
(sorted-set-remove! *set* 80)
jackfirth commented 2 years ago

Closed by #508.