diff options
| author | Gabor Greif <ggreif@gmail.com> | 2016-10-17 10:05:45 +0200 |
|---|---|---|
| committer | Gabor Greif <ggreif@gmail.com> | 2016-10-17 10:05:45 +0200 |
| commit | f43db14e2cae9cd181b283cdc7d7940903689bf6 (patch) | |
| tree | ceaf0525d4ac113cb7cffacd24baf1c5a758a1d3 /compiler/ghci/ByteCodeGen.hs | |
| parent | a391a386e6cf00b8192c5d52a898a86a1e436eb8 (diff) | |
| download | haskell-f43db14e2cae9cd181b283cdc7d7940903689bf6.tar.gz | |
Typos in comments
Diffstat (limited to 'compiler/ghci/ByteCodeGen.hs')
| -rw-r--r-- | compiler/ghci/ByteCodeGen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/ghci/ByteCodeGen.hs b/compiler/ghci/ByteCodeGen.hs index 90e2174228..0e7aea493e 100644 --- a/compiler/ghci/ByteCodeGen.hs +++ b/compiler/ghci/ByteCodeGen.hs @@ -433,7 +433,7 @@ schemeE d s p (AnnLet (AnnNonRec x (_,rhs)) (_,body)) Just data_con <- isDataConWorkId_maybe v, dataConRepArity data_con == length args_r_to_l = do -- Special case for a non-recursive let whose RHS is a - -- saturatred constructor application. + -- saturated constructor application. -- Just allocate the constructor and carry on alloc_code <- mkConAppCode d s p data_con args_r_to_l body_code <- schemeE (d+1) s (Map.insert x d p) body |