Advertisement
Guest User

Untitled

a guest
Dec 6th, 2015
122
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.68 KB | None | 0 0
  1.  
  2. module type Proov
  3. = sig
  4.  
  5. type t
  6. val a : unit -> t
  7.  
  8. end
  9.  
  10. module Proov1
  11. : Proov
  12. with type t = int
  13.  
  14. = struct
  15.  
  16. type t = int
  17.  
  18. let a = 10
  19.  
  20. end
  21.  
  22. module type Proov = sig type t val a : unit -> t end
  23. File "kodutöö.ml", line 14, characters 2-49:
  24. Error: Signature mismatch:
  25. Modules do not match:
  26. sig type t = int val a : int end
  27. is not included in
  28. sig type t = int val a : unit -> t end
  29. Values do not match: val a : int is not included in val a : unit -> t
  30. File "kodutöö.ml", line 6, characters 4-21: Expected declaration
  31. File "kodutöö.ml", line 18, characters 8-9: Actual declaration
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement