PACKAGE Spider.My_Stuff IS
------------------------------------------------------------------
--| Additional Spider Commands; this is a child package.
--| Author: Michael B. Feldman, The George Washington University 
--| Last Modified: July 1995                                     
------------------------------------------------------------------

  PROCEDURE Left;
  -- Pre:  None
  -- Post: Spider turns 90 degrees to the left. 

  PROCEDURE Step(HowMany: IN Positive);
  -- Pre:  None
  -- Post: Spider takes HowMany steps forward 
  --   in the direction it is facing.
  -- Raises: Hit_the_Wall is if spider tries to step into a wall.

END Spider.My_Stuff;