(module
  (memory 256 256)
  (export "memory" memory)
  (export "floats" $floats)
  (func $floats (param $f f32) (result f32)
    (local $t f32)
    (return
      (f32.add
        (get_local $t)
        (get_local $f)
      )
    )
  )
  (func $neg (param $k i32) (param $p i32) (result f32)
    (local $n f32)
    (set_local $n
      (f32.neg
        (block
          (i32.store
            (get_local $k)
            (get_local $p)
          )
          (f32.load
            (get_local $k)
          )
        )
      )
    )
    (return
      (get_local $n)
    )
  )
)