Changeset 4001 for branches/f4grobner
- Timestamp:
- 2016-05-30T21:31:11-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/priority-queue.lisp
r4000 r4001 42 42 (test #'<=) 43 43 (element-key #'identity)) 44 (with-accessors ((heap priority-queue-heap) 45 (test-x priority-queue-test)) 44 (with-slots (heap (test-x test)) 46 45 self 47 46 (setf heap (make-heap :element-type element-type) … … 54 53 (heap-insert heap item test)) 55 54 self)) 56 57 55 58 56 (defgeneric dequeue (self)
Note:
See TracChangeset
for help on using the changeset viewer.