fix example

OCamlPro · Sep 15, 2023 · 62df3cb · 62df3cb
1 parent ee3fe6e
commit 62df3cb
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/example/README.md b/example/README.md
@@ -102,12 +102,12 @@ let pure_wasm_module =
   | Ok modul -> modul
 
 (* our pure wasm module, linked with `sausage` *)
-let module_to_run =
+let module_to_run, link_state =
   match
     Compile.until_link link_state ~optimize:true ~name:None pure_wasm_module
   with
   | Error msg -> failwith msg
-  | Ok (m, _state) -> m
+  | Ok (m, link_state) -> m
 
 (* let's run it ! it will print the values as defined in the print_i32 function *)
 let () =

diff --git a/example/extern.ml b/example/extern.ml
@@ -36,12 +36,12 @@ let pure_wasm_module =
   | Ok modul -> modul
 
 (* our pure wasm module, linked with `sausage` *)
-let module_to_run =
+let module_to_run, link_state =
   match
     Compile.until_link link_state ~optimize:true ~name:None pure_wasm_module
   with
   | Error msg -> failwith msg
-  | Ok (m, _state) -> m
+  | Ok v -> v
 
 (* let's run it ! it will print the values as defined in the print_i32 function *)
 let () =