copy semantics

[awestlake87]

struct Object
    int @a
    *int @ptr

    oper construct(int a):
        @a: a
        @ptr: &@a

    oper copy(&Object other):
        @a: other.a
        @ptr: &@a

    oper this = copy (&Object other):
        @a: other.a