git ssb

1
;; starts with an caller of 5d48c1018904a172886829bbbd9c6f4a2d06c47b
2
(module
3
  (memory 1)
4
  (import $sstore  "ethereum" "sstore" (param i32 i32))
5
  (import $sload    "ethereum" "sload"   (param i32 i32))
6
7
  (export "test" 0)
8
  (export "a" memory)
9
  (func 
10
    (local $temp i64)
11
    (block
12
      ;; should roundtrip store and load a value from storage
13
      (i64.store (i32.const 0) (i64.const 173553719826446289))
14
      (call_import $sstore (i32.const 64) (i32.const 0))
15
      (call_import $sload (i32.const 64) (i32.const 64))
16
      (set_local $temp 
17
        (i64.load (i32.const 64)))
18
19
      (if (i64.eq (i64.load (i32.const 0)) (i64.const 173553719826446289))
20
        (return))
21
      (unreachable)
22
    )
23
  )
24
)
25