markRTS :: StateClass st obj => RunTimeState st obj -> IO [PID obj]
markRTS rts = ((M.elems (shadows rts)) ++) <$> markState (state rts)
markRTS :: StateClass st obj => RunTimeState st obj -> IO [PID obj]
markRTS rts = ((M.elems (shadows rts)) ++) <$> markState (state rts)
markRTS rts = ((M.elems (shadows rts)) ++) <$> markState (state rts)