Skip to content

Commit

Permalink
Add comment with instruction to improve raise_errorf implem
Browse files Browse the repository at this point in the history
Signed-off-by: Nathan Rebours <[email protected]>
  • Loading branch information
NathanReb committed Jun 21, 2024
1 parent f36550e commit e2ad097
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions astlib/location.ml
Original file line number Diff line number Diff line change
Expand Up @@ -125,5 +125,7 @@ module Error = struct
end

let raise_errorf ?loc msg =
(* Update from [kasprintf] to [kdprintf] + [Format_doc.deprecated_printer]
when ocaml lower bound is 4.08+ *)
(*IF_AT_LEAST 503 Format.kasprintf (fun s -> raise_errorf ?loc "%s" s) msg *)
(*IF_NOT_AT_LEAST 503 raise_errorf ?loc msg *)

0 comments on commit e2ad097

Please sign in to comment.