From fb95331a3cd5fe39b6a8db0f9e0d23bd09fd3aa5 Mon Sep 17 00:00:00 2001
From: Damien Doligez <damien.doligez-inria.fr>
Date: Sat, 6 Nov 2004 20:13:41 +0000
Subject: [PATCH] ajout "\ " dans les chaines

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6667 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 camlp4/lib/token.ml | 1 +
 1 file changed, 1 insertion(+)

diff --git a/camlp4/lib/token.ml b/camlp4/lib/token.ml
index 33943263d..a5204d637 100644
--- a/camlp4/lib/token.ml
+++ b/camlp4/lib/token.ml
@@ -153,6 +153,7 @@ value rec backslash s i =
     | '\\' -> ('\\', i + 1)
     | '"' -> ('"', i + 1)
     | ''' -> (''', i + 1)
+    | ' ' -> (' ', i + 1)
     | '0'..'9' as c -> backslash1 (valch c) s (i + 1)
     | 'x' -> backslash1h s (i + 1)
     | _ -> raise Not_found ]