Lines Matching refs:listScopes
361 listScopes :: Scope -> [Located a] -> [RScoped (Located a)]
362 listScopes _ [] = [] function
363 listScopes rhsScope [pat] = [RS rhsScope pat] function
364 listScopes rhsScope (pat : pats) = RS sc pat : pats' function
366 pats'@((RS scope p):_) = listScopes rhsScope pats
378 listScopes patScope (map dL xs)
387 map (\(RS sc a)-> TVS tvScope sc a) $ listScopes rhsScope xs
842 scoped_fds = listScopes pscope fds
861 [ toHie $ listScopes (mkLScope body) guards
960 , toHie $ listScopes NoScope stmts
1062 toHie $ listScopes NoScope stmts)
1066 [ toHie $ listScopes scope stmts
1182 [ toHie $ listScopes NoScope stmts
1248 , toHie $ listScopes NoScope stmts