How can I speed up my function that reads a file and returns its contents?

Question

I am new to OCaml, but I have experience in F# and Haskell. I\'m really surprised by the apparent lack of functionalities that seem elementary in a standard library, to illu