(test-begin "wasm")

(define testdir "retropikzel/wasm")
(define testfile1 (string-append testdir "/" "plus.wasm"))
(define testfile2 (string-append "/tmp/tr7/a.out.wasm"))
(define sexp (wasm->sexp (open-binary-input-file testfile2)))
(show #t (pretty sexp))

(test-end "wasm")