Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
jberryman
GHC
Commits
1607c878
Commit
1607c878
authored
Jan 10, 2006
by
simonmar
Browse files
[project @ 2006-01-10 09:47:51 by simonmar]
Fix compilation with GHC 6.2.x, hopefully
parent
e0dc0bc8
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/utils/FastString.lhs
View file @
1607c878
...
...
@@ -455,6 +455,7 @@ pokeCAString ptr str =
go str 0
#if __GLASGOW_HASKELL__ < 600
mallocForeignPtrBytes :: Int -> IO (ForeignPtr a)
mallocForeignPtrBytes n = do
r <- mallocBytes n
...
...
@@ -464,5 +465,10 @@ foreign import ccall unsafe "stdlib.h free"
finalizerFree :: Ptr a -> IO ()
peekCAStringLen = peekCStringLen
#elif __GLASGOW_HASKELL__ <= 602
peekCAStringLen = peekCStringLen
#endif
\end{code}
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment