diff options
| -rw-r--r-- | compiler/utils/Util.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/utils/Util.lhs b/compiler/utils/Util.lhs index ec5070f26a..e019f67ca7 100644 --- a/compiler/utils/Util.lhs +++ b/compiler/utils/Util.lhs @@ -815,7 +815,7 @@ looksLikeModuleName [] = False looksLikeModuleName (c:cs) = isUpper c && go cs where go [] = True go ('.':cs) = looksLikeModuleName cs - go (c:cs) = (isAlphaNum c || c == '_') && go cs + go (c:cs) = (isAlphaNum c || c == '_' || c == '\'') && go cs \end{code} Akin to @Prelude.words@, but acts like the Bourne shell, treating |