Commits

camlspotter committed 17870d2 Merge
  • Participants
  • Parent commits 50fee09, 44346e6
  • Branches p4hack

Comments (0)

Files changed (1)

     with
     | _ -> error "unexpected end of stream"
 
+(*
+  let take =
+    prefix 1 >>= fun s -> return (String.unsafe_get s 0)
+*)
+
   let takeWhile p =
     stream >>= fun str ->
     let s, str' = Sbuffer.takeWhile p str in