(test-begin "wasm")

(define testdir "retropikzel/wasm")
(define testfile1 (string-append testdir "/" "plus.wasm"))

(when (not (file-exists? testfile1))
  (error (string-append testfile1 " does not exist")))

(define bytes (with-input-from-file testfile1 (lambda () (read-bytevector 10000))))

(write (wasm->sexp bytes))
(newline)

(test-end "wasm")