[comp.sources.games] v11i002: adl2 - yet another adventure definition system, Patch1

billr@saab.CNA.TEK.COM (Bill Randle) (07/27/90)

Submitted-by: David Goodenough <dg%pallio.UUCP@xait.xerox.COM>
Posting-number: Volume 11, Issue 2
Archive-name: adl2/Patch1
Patch-To: adl2: Volume 9, Issue 98-99

	[This is collected set of patches from the net. One is
	 from the original author; the other two are from other
	 netters. If I missed some, please let me know or send me
	 the diffs.  -br]

#! /bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#		"End of shell archive."
# Contents:  patches01
# Wrapped by billr@saab on Thu Jul 26 15:49:21 1990
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'patches01' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'patches01'\"
else
echo shar: Extracting \"'patches01'\" \(1684 characters\)
sed "s/^X//" >'patches01' <<'END_OF_FILE'
X*** config.h.orig	Thu May 17 10:47:23 1990
X--- config.h	Thu Jul 26 15:44:48 1990
X***************
X*** 8,15 ****
X--- 8,18 ----
X  
X  #include	<ctype.h>
X  #include	<fcntl.h>
X+ 
X+ #ifndef BSD
X  #include	<unistd.h>
X  #include	<malloc.h>
X+ #endif
X  
X  /*
X   * CREAT(filename) will make the file anew
X***************
X*** 27,32 ****
X--- 30,39 ----
X   * SEEK(fd, pos) will seek to pos * 128 within the file
X   */
X  
X+ #ifndef SEEK_SET
X+ #define SEEK_SET  0
X+ #endif
X+ 
X  #define	SEEK(fd, pos)	lseek((fd), (pos) * 128, SEEK_SET)
X  
X  /*
X***************
X*** 92,97 ****
X--- 99,108 ----
X  /*
X   * alloc(n) should allocate n bytes
X   */
X+ 
X+ #ifdef BSD
X+ extern char *malloc()
X+ #endif
X  
X  #define	alloc(n)	(malloc((n)))
X  
X*** play.c.orig	Tue May 22 08:16:51 1990
X--- play.c	Thu Jul 26 15:45:42 1990
X***************
X*** 849,855 ****
X  	 {
X  	    v = tnum >> 7 & 63;
X  	    n = tnum & 127;
X! 	    if (n == (-3 & 63))
X  	      n = uloc;
X  	    if (tnum & 0x2000)
X  	      return(((v == (-1 & 63)) ? uloc : (items[v]._iloc & 127)) != n);
X--- 849,855 ----
X  	 {
X  	    v = tnum >> 7 & 63;
X  	    n = tnum & 127;
X! 	    if (n == (-3 & 127))
X  	      n = uloc;
X  	    if (tnum & 0x2000)
X  	      return(((v == (-1 & 63)) ? uloc : (items[v]._iloc & 127)) != n);
X*** star.src.orig	Wed May 16 16:47:17 1990
X--- star.src	Thu Jul 26 15:36:28 1990
X***************
X*** 725,731 ****
X  i vc=5		; ship blown away
X      t "35
X  e		; k ship scanned once, tell some more
X!     t "36	; talk about the crew
X  .
X  
X  # now the planet locations
X--- 725,731 ----
X  i vc=5		; ship blown away
X      t "35
X  e		; k ship scanned once, tell some more
X!     t "36 vc=3	; talk about the crew
X  .
X  
X  # now the planet locations
END_OF_FILE
if test 1684 -ne `wc -c <'patches01'`; then
    echo shar: \"'patches01'\" unpacked with wrong size!
fi
# end of 'patches01'
fi
echo shar: End of shell archive.
exit 0