Module `Ocaml_typing.Errortrace`Source

Sourcetype position =

| First
| Second

Sourceval swap_position : position -> position

Sourceval print_pos : position Merlin_utils.Format_doc.printer

Sourcetype expanded_type = {

ty : Types.type_expr;
expanded : Types.type_expr;

}

Sourceval trivial_expansion : Types.type_expr -> expanded_type

trivial_expansion ty creates an expanded_type whose expansion is also ty. Usually, you want Ctype.expand_type instead, since the expansion carries useful information; however, in certain circumstances, the error is about the expansion of the type, meaning that actually performing the expansion produces more confusing or inaccurate output.

Sourcetype 'a diff = {

got : 'a;
expected : 'a;

}

Sourceval map_diff : ('a -> 'b) -> 'a diff -> 'b diff

map_diff f {expected;got} is {expected=f expected; got=f got}

Sourcetype 'a escape_kind =

| Constructor of Path.t
| Univ of Types.type_expr
| Self
| Module_type of Path.t
| Equation of 'a
| Constraint

Scope escape related errors

Sourcetype 'a escape = {

kind : 'a escape_kind;
context : Types.type_expr option;

}

Sourceval map_escape : ('a -> 'b) -> 'a escape -> 'b escape

Sourceval explain : 'a list -> (prev:'a option -> 'a -> 'b option) -> 'b option

Sourcetype unification = private

| Unification

Type indices

Sourcetype comparison = private

| Comparison

Sourcetype fixed_row_case =

| Cannot_be_closed
| Cannot_add_tags of string list

Sourcetype 'variety variant =

| Incompatible_types_for : string -> _ variant
| No_tags : position * (Ocaml_parsing.Asttypes.label * Types.row_field) list -> _ variant
| No_intersection : unification variant
| Fixed_row : position * fixed_row_case * Types.fixed_explanation -> unification variant
| Presence_not_guaranteed_for : position * string -> comparison variant
| Openness : position -> comparison variant

Sourcetype 'variety obj =

| Missing_field : position * string -> _ obj
| Abstract_row : position -> _ obj
| Self_cannot_be_closed : unification obj

Sourcetype first_class_module =

| Package_cannot_scrape of Path.t
| Package_inclusion of Merlin_utils.Format_doc.doc
| Package_coercion of Merlin_utils.Format_doc.doc

Sourcetype ('a, 'variety) elt =

| Diff : 'a diff -> ('a, _) elt
| Variant : 'variety variant -> ('a, 'variety) elt
| Obj : 'variety obj -> ('a, 'variety) elt
| Escape : 'a escape -> ('a, _) elt
| Function_label_mismatch of Ocaml_parsing.Asttypes.arg_label diff
| Incompatible_fields : {
1. name : string;
2. diff : Types.type_expr diff;
} -> ('a, _) elt
| First_class_module : first_class_module -> ('a, _) elt
| Rec_occur : Types.type_expr * Types.type_expr -> ('a, _) elt

Sourcetype ('a, 'variety) t = ('a, 'variety) elt list

Sourcetype 'variety trace = (Types.type_expr, 'variety) t

Sourcetype 'variety error = (expanded_type, 'variety) t

Source

val map_types : 
  (Types.type_expr -> Types.type_expr) ->
  (expanded_type, 'variety) t ->
  (expanded_type, 'variety) t

merlin specific

Sourceval map : ('a -> 'b) -> ('a, 'variety) t -> ('b, 'variety) t

Source

val incompatible_fields : 
  name:string ->
  got:Types.type_expr ->
  expected:Types.type_expr ->
  (Types.type_expr, _) elt

Sourceval swap_trace : ('a, 'variety) t -> ('a, 'variety) t

The traces ('variety t) are the core error types. However, we bundle them up into three "top-level" error types, which are used elsewhere: unification_error, equality_error, and moregen_error. In the case of equality_error, this has to bundle in extra information; in general, it distinguishes the three types of errors and allows us to distinguish traces that are being built (or processed) from those that are complete and have become the final error. These error types have the invariants that their traces are nonempty; we ensure that through three smart constructors with matching names.

Sourcetype unification_error = private {

trace : unification error;

}

Sourcetype equality_error = private {

trace : comparison error;
subst : (Types.type_expr * Types.type_expr) list;

}

Sourcetype moregen_error = private {

trace : comparison error;

}

Sourceval unification_error : trace:unification error -> unification_error

Source

val equality_error : 
  trace:comparison error ->
  subst:(Types.type_expr * Types.type_expr) list ->
  equality_error

Sourceval moregen_error : trace:comparison error -> moregen_error

Sourcetype comparison_error =

| Equality_error of equality_error
| Moregen_error of moregen_error

Wraps up the two different kinds of comparison errors in one type

Sourceval swap_unification_error : unification_error -> unification_error

Lift swap_trace to unification_error

Sourcemodule Subtype : sig ... end

Install

Dune Dependency

Authors

Maintainers

Sources

doc/merlin-lib.ocaml_typing/Ocaml_typing/Errortrace/index.html

Module `Ocaml_typing.Errortrace`Source

package merlin-lib

Install

Dune Dependency

Authors

Maintainers

Sources

doc/merlin-lib.ocaml_typing/Ocaml_typing/Errortrace/index.html

Module Ocaml_typing.ErrortraceSource

Module `Ocaml_typing.Errortrace`Source