diff --git a/runtime/wasm/effect.wat b/runtime/wasm/effect.wat index 32efa77662..02bbd147a7 100644 --- a/runtime/wasm/effect.wat +++ b/runtime/wasm/effect.wat @@ -769,26 +769,4 @@ (throw $ocaml_exception (local.get $exn))))) (global.set $effect_allowed (local.get $saved_effect_allowed)) (local.get $res)) - -(@if wasi -(@then - (func (export "%perform") (param (ref eq)) (result (ref eq)) - (call $caml_failwith (@string "perform not implemented")) - (ref.i31 (i32.const 0))) - - (func (export "%reperform") - (param (ref eq) (ref eq) (ref eq)) (result (ref eq)) - (call $caml_failwith (@string "reperform not implemented")) - (ref.i31 (i32.const 0))) - - (func (export "%resume") - (param (ref eq) (ref eq) (ref eq) (ref eq)) (result (ref eq)) - (call $caml_failwith (@string "resume not implemented")) - (ref.i31 (i32.const 0))) - - (func (export "caml_alloc_stack") - (param (ref eq) (ref eq) (ref eq)) (result (ref eq)) - (call $caml_failwith (@string "caml_alloc_stack not implemented")) - (ref.i31 (i32.const 0))) -)) )