Searched refs:newNameIO (Results 1 – 2 of 2) sorted by relevance
134 qNewName = newNameIO162 newName = newNameIO164 newNameIO :: String -> IO Name165 newNameIO s = do { n <- atomicModifyIORef' counter (\x -> (x + 1, x)) function
141 qNewName = newNameIO171 newName = newNameIO173 newNameIO :: String -> IO Name174 newNameIO s = do { n <- atomicModifyIORef' counter (\x -> (x + 1, x)) function