Syntax error when using private in module constraint

[glennsl]

This fails with a syntax error:

module M: S with type t = private int

As far as I understand, private int should parse as any other kind of type declaration.