summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPierre Weis <Pierre.Weis@inria.fr>2003-04-28 10:25:20 +0000
committerPierre Weis <Pierre.Weis@inria.fr>2003-04-28 10:25:20 +0000
commit69f4f19d78e457752e9e6d23d7836e81c38d9799 (patch)
tree750193c9a672e985684c3f5e9d9214344b7a0468
parent1623dc13fc91679ae64a2f2ea074daa256052380 (diff)
downloadocaml-69f4f19d78e457752e9e6d23d7836e81c38d9799.tar.gz
Adding a test for escaped end of lines.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5521 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
-rw-r--r--test/Moretest/tscanf.ml13
1 files changed, 12 insertions, 1 deletions
diff --git a/test/Moretest/tscanf.ml b/test/Moretest/tscanf.ml
index cf82884572..6498ebb5e5 100644
--- a/test/Moretest/tscanf.ml
+++ b/test/Moretest/tscanf.ml
@@ -228,7 +228,18 @@ let test9 () =
test_S "poi" &&
test_S "a\"b" &&
test_S "a\nb" &&
- test_S "a\010b";;
+ test_S "a\010b" &&
+ test_S "a\\\n\
+ b \\\n\
+ c\010\\\n\
+ b" &&
+ test_S "a\\\n\
+ \\\n\
+ \\\n\
+ b \\\n\
+ c\010\\\n\
+ b"
+;;
test (test9 ());;
let unit_S = unit "%S";;