diff options
| author | Luc Maranget <luc.maranget@inria.fr> | 2003-07-24 08:37:34 +0000 |
|---|---|---|
| committer | Luc Maranget <luc.maranget@inria.fr> | 2003-07-24 08:37:34 +0000 |
| commit | b3a4475729c97d8efe8c6d172208d56423af7cd7 (patch) | |
| tree | d4f1d69407e66484e32396d3653dc3023cecc367 /test/Moretest | |
| parent | d17755ef49eeef07206bc0fe7c7dcf10b2ffc34e (diff) | |
documentation of ocamllex command-line options
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5731 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'test/Moretest')
| -rw-r--r-- | test/Moretest/morematch.ml | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/test/Moretest/morematch.ml b/test/Moretest/morematch.ml index 5eb60c620..b8f00b81f 100644 --- a/test/Moretest/morematch.ml +++ b/test/Moretest/morematch.ml @@ -216,8 +216,8 @@ let f = function | (x,(0 as y)) | (y,x) -> y-x ;; -test "foo" f (1,0) (-1); -test "foo" f (1,2) (-1) +test "foo1" f (1,0) (-1); +test "foo1" f (1,2) (-1) ;; @@ -378,9 +378,9 @@ let foo (k1, k2) = match k1,k2 with | _, (A|B|C) -> 4 ;; -test "foo" foo (D A,A) 1 ; -test "foo" foo (D A,B) 4 ; -test "foo" foo (A,A) 4 ; () +test "foo2" foo (D A,A) 1 ; +test "foo2" foo (D A,B) 4 ; +test "foo2" foo (A,A) 4 ; () ;; type yaya = A | B |