Skip to content
Snippets Groups Projects
Commit d410f90d authored by Simon Marlow's avatar Simon Marlow
Browse files

[project @ 1999-10-13 10:43:15 by simonmar] 

typo
parent 678c3543
No related merge requests found
Hide whitespace changes
Inline Side-by-side
ghc/compiler/utils/PrimPacked.lhs
+ 1
− 1
View file @ d410f90d
......@@ -185,7 +185,7 @@ new_ps_array size = ST $ \ s ->
#if __GLASGOW_HASKELL__ < 400
case (newCharArray# size s) of { StateAndMutableByteArray# s2# barr# ->
STret s2# (MutableByteArray bot barr#) }
#elsif __GLASGOW_HASKELL__ < 405
#elif __GLASGOW_HASKELL__ < 405
case (newCharArray# size s) of { (# s2#, barr# #) ->
(# s2#, MutableByteArray bot barr# #) }
#else
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment