git ssb

1
;; starts with an origin of 5d48c1018904a172886829bbbd9c6f4a2d06c47b
2
(module
3
  (import "ethereum" "getTxOrigin"  (func $origin (param i32)))
4
  (memory 1)
5
6
  (export "main" (func $main))
7
  (export "a" (memory 0))
8
  (func $main 
9
    (block
10
      ;; loads the address into memory
11
      (call $origin (i32.const 0))
12
      (if (i64.eq (i64.load (i32.const 0)) (i64.const 0x72a1048901c1485d))
13
        (return)
14
      )
15
      (unreachable)
16
    )
17
  )
18
)
19