fork download
copy 
  1. module type A = sig val id : string end
  2. module type B = sig val id : string end
  3.  
  4. module GetId (A : A) = struct let res = A.id end
  5.  
  6. module B : B = struct let id = "test" end
  7.  
  8. module Test = GetId (B)
  9.  
Success #stdin #stdout 0s 4440KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
https://ideone.com/TBiz1F
language:
OCaml (ocamlopt 4.05.0)
created:
4 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!