Misc: remove deadcode

Author: hhugo

compiler/lib/code.ml

@@ -122,8 +122,6 @@ end = struct
 
   include T
 
-  let printer = Var_printer.create Var_printer.Alphabet.javascript
-
   module Name = struct
     let names = Int.Hashtbl.create 100
 
@@ -203,7 +201,6 @@ end = struct
 
   let reset () =
     last_var := 0;
-    Var_printer.reset printer;
     Name.reset ()
 
   let print f x =

compiler/lib/var_printer.ml

@@ -81,8 +81,4 @@ let to_string t i =
       in
       loop t i (t.last + 1)
 
-let reset t =
-  Int.Hashtbl.clear t.known;
-  t.last <- -1
-
 let create alphabet = { known = Int.Hashtbl.create 1001; alphabet; last = -1 }

compiler/lib/var_printer.mli

@@ -31,6 +31,4 @@ type t
 
 val create : Alphabet.t -> t
 
-val reset : t -> unit
-
 val to_string : t -> int -> string