Let `protocol` force implemented classes to define constructor

[glassesneo]

protocol Fruit:
  proc `new`(title: string, price: int)

class Apple:
  proc `new`(title: string, price: int) =
    discard