lost ball and chain (trunk only)

Saving the game while punished, not carrying the attached ball,
and while swallowed by a purple worm resulted in losing the
ball and chain.

Since the required information was not being written to the
save file at all, I couldn't come up with a clean way to do this
for the branch, and preserve save file format. I could think
of lots of kludgy ways to do it (insert ball and chain into
the hero's inventory prior to saving, and remove it on restore, etc.)

include/hack.h

@@ -305,6 +305,7 @@ NEARDATA extern coord bhitpos;	/* place where throw or zap hits or stops */
 /* Some misc definitions */
 #define POTION_OCCUPANT_CHANCE(n) (13 + 2*(n))
 #define WAND_BACKFIRE_CHANCE 100
+#define BALL_IN_MON	(u.uswallow && uball && uball->where == OBJ_FREE)
 
 /* Flags to control menus */
 #define MENUTYPELEN sizeof("traditional ")