1. arkdro
  2. odn

Commits

arkdro  committed 8480e1e

rename function

  • Participants
  • Parent commits c329027
  • Branches master

Comments (0)

Files changed (1)

File ocaml/odn/n1.ml

View file
  • Ignore whitespace
   let mant = Big_int.big_int_of_string short_mant_str in
   sign, mant, new_exp
 
-let make_decimal_term n =
+let make_decimal_tuple n =
   let sign, mant, exp = create_decimal n in
   Eterm.ET_tuple [|Eterm.ET_int (Int32.of_int sign);
                   Eterm.ET_bignum (Num.Big_int mant);