From ac8c7b0b8eeb934ce26c52a66a794c7e70a0b51b Mon Sep 17 00:00:00 2001
From: itohy <itohy>
Date: Tue, 11 Apr 2000 06:57:50 +0000
Subject: I couldn't complete level 11 of sokoban without this change....

---
 lang/gforth/files/patch-sum  |  3 ++-
 lang/gforth/patches/patch-ac | 13 +++++++++++++
 2 files changed, 15 insertions(+), 1 deletion(-)
 create mode 100644 lang/gforth/patches/patch-ac

(limited to 'lang/gforth')

diff --git a/lang/gforth/files/patch-sum b/lang/gforth/files/patch-sum
index 3821c70ef1f..fa8e96742fa 100644
--- a/lang/gforth/files/patch-sum
+++ b/lang/gforth/files/patch-sum
@@ -1,4 +1,5 @@
-$NetBSD: patch-sum,v 1.2 2000/04/11 06:54:46 itohy Exp $
+$NetBSD: patch-sum,v 1.3 2000/04/11 06:57:50 itohy Exp $
 
 MD5 (patch-aa) = e7456c7878452b2281044d00819f1ce2
 MD5 (patch-ab) = 3e1da92b3b58a90f84221639127660cb
+MD5 (patch-ac) = b0d778549e13a0ce1528f0a9a5941806
diff --git a/lang/gforth/patches/patch-ac b/lang/gforth/patches/patch-ac
new file mode 100644
index 00000000000..a87beb66554
--- /dev/null
+++ b/lang/gforth/patches/patch-ac
@@ -0,0 +1,13 @@
+$NetBSD: patch-ac,v 1.1 2000/04/11 06:57:50 itohy Exp $
+
+--- sokoban.fs.orig	Tue May  5 02:04:25 1998
++++ sokoban.fs	Mon Apr 10 22:35:30 2000
+@@ -119,7 +119,7 @@
+ 	S" &* " S" .&$" r@ play-rule
+ 	      IF  r> soko +!  1 rocks +! -1 score +!  EXIT  THEN
+ 	S" &$." S" .@*" r@ play-rule
+-	      IF  r> soko +!  1 rocks +! -1 score +!  EXIT  THEN
++	      IF  r> soko +! -1 rocks +!  1 score +!  EXIT  THEN
+ 	-1 moves +!  r> drop  ;
+ 
+ 1            move: soko-right
-- 
cgit v1.2.3