[m-rev.] diff: enforce an invariant using subtypes

[Zoltan Somogyi]

This does not need review.

Zoltan.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Log.stg
Type: application/octet-stream
Size: 285 bytes
Desc: not available
URL: <http://lists.mercurylang.org/archives/reviews/attachments/20240313/823d8d76/attachment-0002.obj>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: DIFF.stg
Type: application/octet-stream
Size: 7707 bytes
Desc: not available
URL: <http://lists.mercurylang.org/archives/reviews/attachments/20240313/823d8d76/attachment-0003.obj>