Priority queue: Difference between revisions

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