fix tests with OCaml 4.06 (safe-string)

ygrek · Mar 12, 2018 · 0ab886b · 0ab886b
1 parent ba288b1
commit 0ab886b
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/test/test_Base64.ml b/test/test_Base64.ml
@@ -42,7 +42,7 @@ let () =
     (fun () -> 
        for i = 0 to 64 do
          let s = Util.random_string () in
-         let enc = Base64.str_encode s in
-         assert ((Base64.str_decode enc) = s);
+         let enc = Base64.encode_string s in
+         assert ((Base64.decode_string enc) = s);
          check_chars enc
        done)