threadState :: History -> [(ThreadId, ThreadState)]
threadState = queryCmd threadStateWorker
threadState :: History -> [(ThreadId, ThreadState)]
threadState = queryCmd threadStateWorker
threadState = queryCmd threadStateWorker