🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sources.bugs
Article #917

Nethack 1.4f bug

#917
From: Brian Campbell
Date: Mon, 24 Aug 1987 21:53
45 lines
1846 bytes
   Here's a fix for a small bug introduced in the 1.4f version of
Nethack.  An additional parameter was added to enexto() that was not
reflected in shk.c (core dump if you try to steal from a shop).

*** shk.orig	Mon Aug 24 17:48:21 1987
--- shk.c	Mon Aug 24 17:42:06 1987
***************
*** 172,178 ****
  			    mm.x = xdnstair;
  			    mm.y = ydnstair;
  			    while(cnt--) {
! 				    mm = enexto(mm.x, mm.y);
  				    (void) mkmon_at('K', mm.x, mm.y);
  			    }
  			    /* Create a swarm near the shopkeeper */
--- 172,178 ----
  			    mm.x = xdnstair;
  			    mm.y = ydnstair;
  			    while(cnt--) {
! 				    enexto(&mm, mm.x, mm.y);
  				    (void) mkmon_at('K', mm.x, mm.y);
  			    }
  			    /* Create a swarm near the shopkeeper */
***************
*** 180,186 ****
  			    mm.x = shopkeeper->mx;
  			    mm.y = shopkeeper->my;
  			    while(cnt--) {
! 				    mm = enexto(mm.x, mm.y);
  				    (void) mkmon_at('K', mm.x, mm.y);
  			    }
  			}
--- 180,186 ----
  			    mm.x = shopkeeper->mx;
  			    mm.y = shopkeeper->my;
  			    while(cnt--) {
! 				    enexto(&mm, mm.x, mm.y);
  				    (void) mkmon_at('K', mm.x, mm.y);
  			    }
  			}
-- 
Brian Campbell          uucp: decvax!utzoo!dciem!nrcaer!cognos!brianc
Cognos Incorporated     mail: 3755 Riverside Drive, Ottawa, Ontario, K1G 3N3
(613) 738-1440          fido: sysop@163/8
Technical Details
Message-ID: <1313@cognos.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!dciem!nrcaer!cognos!brianc

Show Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: arc1-ca.pugleaf.net!utzoo!dciem!nrcaer!cognos!brianc
From: brianc@cognos.uucp (Brian Campbell)
Newsgroups: comp.sources.bugs
Subject: Nethack 1.4f bug
Message-ID: <1313@cognos.UUCP>
Date: Mon, 24-Aug-87 17:53:32 EDT
Article-I.D.: cognos.1313
Posted: Mon Aug 24 17:53:32 1987
Date-Received: Sat, 29-Aug-87 04:07:57 EDT
Organization: Cognos Incorporated, Ottawa, Canada
Lines: 45