From: Robin Houston <robin@cpan.org>
Date: Thu, 5 Apr 2001 20:16:29 +0000 (+0100)
Subject: binmode is no longer an UNOP
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=82bafd27c447b694ac8afacb18ba6e4892659fc4;p=p5sagit%2Fp5-mst-13.2.git

binmode is no longer an UNOP
Message-ID: <20010405201629.A16763@puffinry.freeserve.co.uk>

p4raw-id: //depot/perl@9570
---

diff --git a/ext/B/B/Deparse.pm b/ext/B/B/Deparse.pm
index 53f2006..b274dc0 100644
--- a/ext/B/B/Deparse.pm
+++ b/ext/B/B/Deparse.pm
@@ -944,7 +944,6 @@ sub pp_prototype { unop(@_, "prototype") }
 sub pp_close { unop(@_, "close") }
 sub pp_fileno { unop(@_, "fileno") }
 sub pp_umask { unop(@_, "umask") }
-sub pp_binmode { unop(@_, "binmode") }
 sub pp_untie { unop(@_, "untie") }
 sub pp_tied { unop(@_, "tied") }
 sub pp_dbmclose { unop(@_, "dbmclose") }
@@ -1487,6 +1486,7 @@ sub pp_return { listop(@_, "return") }
 sub pp_open { listop(@_, "open") }
 sub pp_pipe_op { listop(@_, "pipe") }
 sub pp_tie { listop(@_, "tie") }
+sub pp_binmode { listop(@_, "binmode") }
 sub pp_dbmopen { listop(@_, "dbmopen") }
 sub pp_sselect { listop(@_, "select") }
 sub pp_select { listop(@_, "select") }