leave-starved ( game -- game )


Vocabulary
hamurabi.private

Inputs
gamean object


Outputs
gamean object


Definition
USING: accessors formatting kernel ;

IN: hamurabi.private

: leave-starved ( game -- game )
dup deaths>> "YOU STARVED %d PEOPLE IN ONE YEAR!!!\n" printf
leave-fink "exit" throw ;