mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 09:40:21 +00:00
15 lines
342 B
OCaml
15 lines
342 B
OCaml
(*
|
|
* Copyright (c) 2013 Jeremy Yallop.
|
|
*
|
|
* This file is distributed under the terms of the MIT License.
|
|
* See the file LICENSE for details.
|
|
*)
|
|
|
|
let string_of format v =
|
|
let buf = Buffer.create 100 in
|
|
let fmt = Format.formatter_of_buffer buf in begin
|
|
format fmt v;
|
|
Format.pp_print_flush fmt ();
|
|
Buffer.contents buf
|
|
end
|