diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/explore.ml | 2 | ||||
| -rw-r--r-- | lib/pp.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/explore.ml b/lib/explore.ml index 90258b0e55..984114bf1d 100644 --- a/lib/explore.ml +++ b/lib/explore.ml @@ -50,7 +50,7 @@ module Make = functor(S : SearchProblem) -> struct in explore [1] s - (*s Breadth first search. We use functional FIFOS à la Okasaki. *) + (*s Breadth first search. We use functional FIFOS à la Okasaki. *) type 'a queue = 'a list * 'a list @@ -167,7 +167,7 @@ let rewrite f p = Rem 2 : if used for an iso8859_1 encoded string, the result is wrong in very rare cases. Such a wrong case corresponds to any sequence of a character in range 192..253 immediately followed by a - character in range 128..191 (typical case in french is "déçu" which + character in range 128..191 (typical case in french is "déçu" which is counted 3 instead of 4); then no real harm to use always utf8_length even if using an iso8859_1 encoding *) |