git.iko.soy/reflex-dom
on develop help sign in
Update Foreign.hs
5e2cbe7Ali Abrar
src-ghcjs/Reflex/Dom/Internal/Foreign.hs+1−1
compare with develop
unifiedsplit
@@ -33,7 +33,7 @@ withWebViewContext a f = f a
33
33
34foreign import javascript safe "new DataView($3,$1,$2)" js_dataView :: Int -> Int -> JSVal -> JSVal
34foreign import javascript safe "new DataView($3,$1,$2)" js_dataView :: Int -> Int -> JSVal -> JSVal
35
35
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
37
37
38bsToArrayBuffer :: a -> ByteString -> IO JSVal
38bsToArrayBuffer :: a -> ByteString -> IO JSVal
39bsToArrayBuffer _ bs = BS.useAsCString bs $ \cStr -> do
39bsToArrayBuffer _ bs = BS.useAsCString bs $ \cStr -> do