diff options
| author | Sébastien Dailly <sebastien@chimrod.com> | 2021-08-24 15:04:25 +0200 |
|---|---|---|
| committer | Sébastien Dailly <sebastien@chimrod.com> | 2021-08-24 15:04:25 +0200 |
| commit | df92da631e9a10a099a72ba846f90adf99d180df (patch) | |
| tree | c56cffa7045795c0cc494512c28fc34a63f800bc /src/test | |
| parent | 546afdcf2148087f3a90b69c23ea756550f64433 (diff) | |
Added pre-processing
Diffstat (limited to 'src/test')
| -rw-r--r-- | src/test/test.ml | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/test/test.ml b/src/test/test.ml index ca74a9e..5d1d09c 100644 --- a/src/test/test.ml +++ b/src/test/test.ml @@ -17,6 +17,11 @@ let process (optional_line : string option) expected = | Ok response -> if String.equal response expected then () + (* + (Printf.fprintf stdout "%s : %s OK \n%!" + line + expected) + *) else ( error := 1; (Printf.fprintf stdout "%s : got %s / %s expected\n%!" @@ -41,6 +46,7 @@ let tests = ; "abaissées", "abEse(s)" ; "abaissera", "abEs°Ra" ; "achat", "aSa(t)" + ; "as", "a(s)" ; "astiqué", "astike" ; "casait", "kazE(t)" ; "cassait", "kasE(t)" |