We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent bdcee74 commit ac4217bCopy full SHA for ac4217b
src_test/ppx_deriving/test_ppx_import.ml
@@ -54,6 +54,16 @@ type package_type =
54
55
module type Hashable = [%import: (module Hashtbl.HashedType)]
56
57
+module type HashableWith = [%import:
58
+(module Hashtbl.HashedType with type t = string)]
59
+
60
+module HashableWith : HashableWith = struct
61
+ type t
62
63
+ let equal = String.equal
64
+ let hash = int_of_string
65
+end
66
67
[%%import: type self_t = Test_self_import.t]
68
69
let test_self_import _ctxt =
0 commit comments