Priority queue: Difference between revisions

m
Line 4,721:
Header()
while not @isEmpty(b)
//Print @Pop(b)=>tostring$
checkme(@Pop(b))
end while
ObjectCount()
Line 4,762 ⟶ 4,761:
=len(a)=0
end function
Functionfunction Pop(a)
// Group make a copy (but here is a pointer of group)
stack a {=Group}
end function
sub checkme(a as *obj)
Print a=>tostring$
end sub
}
PriorityQueueForGroups
404

edits