Source file error.ml

1
2
3
4
open Util.Error
open Util.Source

let error (at : region) (msg : string) = error_parse at msg