racket/collects/honu/examples/sub-final.honu
2005-05-27 18:56:37 +00:00

8 lines
185 B
Plaintext

type t {}
final class c() : t { init int x; export t; }
mixin mx() : t at t with int x { init int z; super(x = 1); export t; }
subclass c2 = mx(c); // should fail because c is final