Mon Jun 3 15:21:17 PDT 2002
[netwalk.git] / command_new_game.e
blob75921363b25e7c63a9cbef08b9cd8aa9b8cdf851
1 class COMMAND_NEW_GAME
2 inherit COMMAND
3 creation make
4 feature
5 main : NETWALK
7 make(m : NETWALK) is
8 do
9 main := m
10 end
12 execute is
14 main.new_game
15 end
16 end