From 1d7508f6ba8cf8ca80672ef428c1bc2bcde06686 Mon Sep 17 00:00:00 2001
From: =?utf8?q?J=C3=A9r=C3=B4me=20Quelin?= <jquelin@gmail.com>
Date: Mon, 3 Nov 2008 20:45:19 +0100
Subject: [PATCH] fix test to match fixed k semantics

---
 t/5-befunge/k-system.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/t/5-befunge/k-system.t b/t/5-befunge/k-system.t
index 7e41e64..dcc6937 100644
--- a/t/5-befunge/k-system.t
+++ b/t/5-befunge/k-system.t
@@ -250,7 +250,7 @@ BEGIN { $tests += 1 };
 
 sel; # 23+. Args.
 $bef->store_code( <<'END_OF_CODE' );
-yf8+k$ >  :#, _ $a, :#v _q
+yf7+k$ >  :#, _ $a, :#v _q
        ^              <
 END_OF_CODE
 $bef->run_code( "foo", 7, "bar" );
@@ -265,7 +265,7 @@ sel; # 24+. %ENV.
 $bef->store_code( <<'END_OF_CODE' );
 v                   > $ ;EOL; a,  v
               > :! #^_ ,# #! #: <
-> y ff1++k$ : | ;new pair;   :    <
+> y ff+k$   : | ;new pair;   :    <
               q
 END_OF_CODE
 $bef->run_code;
-- 
2.11.4.GIT