From c312bbb8fbf396293ba1da16aca114936d3282e1 Mon Sep 17 00:00:00 2001
From: =?utf8?q?J=C3=A9r=C3=B4me=20Quelin?= <jquelin@gmail.com>
Date: Thu, 30 Oct 2008 18:53:53 +0100
Subject: [PATCH] list of command-line arguments should be terminated by a
 double null

---
 lib/Language/Befunge/Ops.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Language/Befunge/Ops.pm b/lib/Language/Befunge/Ops.pm
index 9487a20..d78e194 100644
--- a/lib/Language/Befunge/Ops.pm
+++ b/lib/Language/Befunge/Ops.pm
@@ -986,7 +986,7 @@ sub sys_info {
     push @cells, \@sizes;
 
     # 19. $file + params.
-    my $str = join chr(0), $lbi->get_file, @{$lbi->get_params}, chr(0);
+    my $str = join chr(0), $lbi->get_file, @{$lbi->get_params}, chr(0)x2;
     my @cmdline = reverse map { ord } split //, $str;
     push @cells, \@cmdline;
 
-- 
2.11.4.GIT