Commits

arkdro committed 3bec32e

style cleanup

Comments (0)

Files changed (1)

ocaml/src/odec_port.ml

     let ipow = Big_int.power_int_positive_int 10 pow in
     let bpow = Num.Big_int ipow in
     Num.mult_num mant bpow
-  | pow when pow < 0 ->
+  | pow ->
     let ipow = Big_int.power_int_positive_int 10 (-pow) in
     let bpow = Num.Big_int ipow in
     Num.div_num mant bpow