PR#5598: remove macos9-style newline support

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@12420 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Damien Doligez 2012-05-02 14:44:38 +00:00
parent 828ad95b7b
commit 8c17777b85
1 changed files with 1 additions and 1 deletions

View File

@ -218,7 +218,7 @@ let report_error ppf = function
}
let newline = ('\010' | '\013' | "\013\010")
let newline = ('\010' | '\013' )
let blank = [' ' '\009' '\012']
let lowercase = ['a'-'z' '\223'-'\246' '\248'-'\255' '_']
let uppercase = ['A'-'Z' '\192'-'\214' '\216'-'\222']