Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!rice!uw-beaver!zephyr.ens.tek.com!tekred!saab!billr From: billr@saab.CNA.TEK.COM (Bill Randle) Newsgroups: comp.sources.games Subject: v11i002: adl2 - yet another adventure definition system, Patch1 Message-ID: <6031@tekred.CNA.TEK.COM> Date: 26 Jul 90 22:49:47 GMT Sender: news@tekred.CNA.TEK.COM Lines: 113 Approved: billr@saab.CNA.TEK.COM Submitted-by: David Goodenough 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 '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 X #include X+ X+ #ifndef BSD X #include X #include 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