Changeset 4136
- Timestamp:
- 2016-06-01T19:56:41-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/priority-queue.lisp
r4004 r4136 33 33 34 34 (defclass priority-queue () 35 ((heap :initarg :heap :reader priority-queue-heap) 35 ((element-type :initarg :element-type :reader priority-queue-element-type :type symbol) 36 (heap :initarg :heap :reader priority-queue-heap) 36 37 (test :initarg :test :reader priority-queue-test)) 37 38 (:documentation "Representa a priority queue based on heaps. … … 39 40 40 41 (defmethod initialize-instance :after ((self priority-queue) 41 &key42 43 44 42 &key 43 (element-type 'fixnum) 44 (test #'<=) 45 (element-key #'identity)) 45 46 (with-slots (heap (test-x test)) 46 47 self
Note:
See TracChangeset
for help on using the changeset viewer.