diff options
| author | Brian Wignall <brianwignall@gmail.com> | 2019-11-08 16:21:03 -0500 |
|---|---|---|
| committer | Brian Wignall <brianwignall@gmail.com> | 2019-11-23 19:04:52 -0500 |
| commit | 7b4c7b75be351e9b6a40093cbccab728dd89064f (patch) | |
| tree | 01126ac3823a1f1b197ac1865d7bc628eb4676a5 /compiler/cmm | |
| parent | c14b723f7fa24b4db0b561f9ab0d6e0f4261fd2f (diff) | |
| download | haskell-7b4c7b75be351e9b6a40093cbccab728dd89064f.tar.gz | |
Fix typos
Diffstat (limited to 'compiler/cmm')
| -rw-r--r-- | compiler/cmm/CmmSwitch.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/cmm/CmmSwitch.hs b/compiler/cmm/CmmSwitch.hs index c2ce3b9e00..a5fa6457e2 100644 --- a/compiler/cmm/CmmSwitch.hs +++ b/compiler/cmm/CmmSwitch.hs @@ -195,7 +195,7 @@ switchTargetsToTable (SwitchTargets _ (lo,hi) mbdef branches) -- .quad _c20q -- .quad _c20r --- | The list of all labels occuring in the SwitchTargets value. +-- | The list of all labels occurring in the SwitchTargets value. switchTargetsToList :: SwitchTargets -> [Label] switchTargetsToList (SwitchTargets _ _ mbdef branches) = maybeToList mbdef ++ M.elems branches |