on develop help sign in
Update Foreign.hs
commit5e2cbe7f9a2d8aebb1858e81a8b9ab6e8e927ebb authorAli Abrar <aliabrar@gmail.com> dateSat 6 Feb 2016, 13:17 (11 years ago) parente61e94b
1 file changed+1−1
src-ghcjs/Reflex/Dom/Internal/Foreign.hs+1−1
src-ghcjs/Reflex/Dom/Internal/Foreign.hs+1−1
@@ -33,7 +33,7 @@ withWebViewContext a f = f a
3333
3434foreign import javascript safe "new DataView($3,$1,$2)" js_dataView :: Int -> Int -> JSVal -> JSVal
3535
36−foreign import javascript unsafe "new Uint8Array($1_1.buf, $1_2, $2)[\"buffer\"]" extractByteArray :: Ptr CChar -> Int -> IO JSVal
36+foreign import javascript unsafe "new Uint8Array($1_1['buf'], $1_2, $2)['buffer']" extractByteArray :: Ptr CChar -> Int -> IO JSVal
3737
3838bsToArrayBuffer :: a -> ByteString -> IO JSVal
3939bsToArrayBuffer _ bs = BS.useAsCString bs $ \cStr -> do