summaryrefslogtreecommitdiff
path: root/utils/genprimopcode
diff options
context:
space:
mode:
authorBrian Wignall <brianwignall@gmail.com>2019-11-08 16:21:03 -0500
committerBrian Wignall <brianwignall@gmail.com>2019-11-23 19:04:52 -0500
commit7b4c7b75be351e9b6a40093cbccab728dd89064f (patch)
tree01126ac3823a1f1b197ac1865d7bc628eb4676a5 /utils/genprimopcode
parentc14b723f7fa24b4db0b561f9ab0d6e0f4261fd2f (diff)
downloadhaskell-7b4c7b75be351e9b6a40093cbccab728dd89064f.tar.gz
Fix typos
Diffstat (limited to 'utils/genprimopcode')
-rw-r--r--utils/genprimopcode/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/genprimopcode/Main.hs b/utils/genprimopcode/Main.hs
index 3427a1ebae..b99f36dad2 100644
--- a/utils/genprimopcode/Main.hs
+++ b/utils/genprimopcode/Main.hs
@@ -427,7 +427,7 @@ wrapOp :: String -> String
wrapOp nm | isAlpha (head nm) = nm
| otherwise = "(" ++ nm ++ ")"
--- | Turn an identifer or operator into its infix form
+-- | Turn an identifier or operator into its infix form
asInfix :: String -> String
asInfix nm | isAlpha (head nm) = "`" ++ nm ++ "`"
| otherwise = nm