@@ -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