Storable.Mutable.set operation for Vector Double does not work correctly on ghcjs

[dfordivam]

With ghcjs the below code results in output [1.0,5.299808824e-315]

import qualified Data.Vector.Storable as S
import qualified Data.Vector.Storable.Mutable as SM

vecSet = do
  v <- SM.new 2
  SM.set v (1.0 :: Double)
  print =<< S.freeze v

The problematic code is here, this causes the use of primitive Word64 operations which dont work for Double as their underlying representation is different.

vector/vector/src/Data/Vector/Storable/Mutable.hs

Line 217 in f2339ea

8 -> storableSetAsPrim n fp x (undefined :: Word64)

[lehins]

Fixed in #411

[lehins]

@dfordivam In case you need this fix, I just released a minor fixup version that includes this bugfix: vector-0.12.3.1