src/HOL/Matrix/Compute_Oracle/compute.ML
changeset 41491 a2ad5b824051
parent 40314 b5ec88d9ac03
child 41959 b460124855b8
equal deleted inserted replaced
41490:0f1e411a1448 41491:a2ad5b824051
   168   | machine_of_prog (ProgHaskell _) = HASKELL
   168   | machine_of_prog (ProgHaskell _) = HASKELL
   169   | machine_of_prog (ProgSML _) = SML
   169   | machine_of_prog (ProgSML _) = SML
   170 
   170 
   171 type naming = int -> string
   171 type naming = int -> string
   172 
   172 
   173 fun default_naming i = "v_" ^ Int.toString i
   173 fun default_naming i = "v_" ^ string_of_int i
   174 
   174 
   175 datatype computer = Computer of
   175 datatype computer = Computer of
   176   (theory_ref * Encode.encoding * term list * unit Sorttab.table * prog * unit Unsynchronized.ref * naming)
   176   (theory_ref * Encode.encoding * term list * unit Sorttab.table * prog * unit Unsynchronized.ref * naming)
   177     option Unsynchronized.ref
   177     option Unsynchronized.ref
   178 
   178