import patty
variant Message:
Hit(hp: int)
Death(died: string)
proc writeMsg(m: Msg): string =
match m:
Hit(hp):
result = "HIT " & $hp
Death(died):
result = "DEATH " & died
Cannot get much shorter
