%---------------------------------------------------------------------------% % vim: ts=4 sw=4 et ft=mercury %---------------------------------------------------------------------------% :- module add_constructor_r_2. :- interface. :- type foo ---> a ; b(int).