Wie wird eine hübsch gedruckte Zeichenfolge mit der Funktion Format.fprintf zurückgegeben?

Question

Ich versuche Format.fprintf für ein Stück Code in einem Modul zu verstehen und zu verwenden. Ich habe eine Funktion wie diese

let some_function fmt s = match s with 
    | For(exp,_) -> Format.fprintf fmt "something here" 
    | Assume x-> Format.fprintf fmt "something here as well" 

ich diese Funktion ändern möchten einen String zurück. Printf.sprintf ist keine Option wegen einiger hübscher Drucker, die ich im ursprünglichen Code verwende. Bitte helfen Sie.

Answer 1

Verwendung Format.asprintf:

let string_of_s = Format.asprintf "%a" some_function s 

Ich empfehle Format.sprintf nicht zu verwenden, da es nur eine begrenzte Art hat. Zum Beispiel führt die folgenden nicht typ überprüfen:

let string_of_s_ill_typed = Format.sprintf "%a" some_function s