Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

test.sh -u

  • Loading branch information...
commit db9dbf5e88d20b07ad24a78ce54583a153a48427 1 parent ba519e3
@pszilagyi pszilagyi authored
Showing with 21 additions and 0 deletions.
  1. +21 −0 tests/failing-output/js-args.ml
View
21 tests/failing-output/js-args.ml
@@ -123,6 +123,14 @@ let _ =
<= quux)) (* lined up under left argument to op,
sim. to ^ above *)
let _ =
+ let min_closing_backoff =
+ -. ( Hidden_float.expose (arb.cfg.base_edge @! Buy)
+ +. Hidden_float.expose (arb.cfg.base_edge @! Sell))
+ in
+ 0
+
+(* Sim. indentation of if conditions: *)
+let _ =
if (a
<= b)
then ()
@@ -130,3 +138,16 @@ let _ =
if a
<= b
then ()
+let _ =
+ if Edge_adjustment.is_zero arb.cfg.extra_edge
+ && 0. = sys.plugs.edge_backoff
+ && 0. = zero_acvol_edge_backoff
+ then 0.
+ else 1.
+let _ =
+ if
+ Edge_adjustment.is_zero arb.cfg.extra_edge
+ && 0. = sys.plugs.edge_backoff
+ && 0. = zero_acvol_edge_backoff
+ then 0.
+ else 1.
Please sign in to comment.
Something went wrong with that request. Please try again.