diff options
author | Sébastien Dailly <sebastien@chimrod.com> | 2018-08-02 19:44:49 +0200 |
---|---|---|
committer | Sébastien Dailly <sebastien@chimrod.com> | 2018-08-02 19:44:49 +0200 |
commit | c20b6dd7533775eaed045950e04175b020ac52c4 (patch) | |
tree | 3b61fbfecd8d161808fb22b4c7f9b213335f9072 /tests/odf | |
parent | a0ea857685804735d60f19a166274745d8785e62 (diff) |
Update expression evaluation
Diffstat (limited to 'tests/odf')
-rw-r--r--[-rwxr-xr-x] | tests/odf/odf_ExpressionParser_test.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/odf/odf_ExpressionParser_test.ml b/tests/odf/odf_ExpressionParser_test.ml index 40dcbcd..d129e7b 100755..100644 --- a/tests/odf/odf_ExpressionParser_test.ml +++ b/tests/odf/odf_ExpressionParser_test.ml @@ -24,8 +24,8 @@ module Show = ScTypes.Expr.Eval(Show_expr.Show_Expr(Show_ref)(Show_type)) let _msg ~(expected:ScTypes.Expr.t) ~(result:ScTypes.Expr.t) =
let b1 = UTF8.Buffer.create 16
and b2 = UTF8.Buffer.create 16 in
- Show.eval expected () b1;
- Show.eval result () b2;
+ Show.eval expected b1;
+ Show.eval result b2;
Printf.sprintf "Expected \n\t%s but got \n\t%s"
(UTF8.raw_encode @@ UTF8.Buffer.contents b1)
|