summaryrefslogtreecommitdiff
path: root/opcode.pl
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-07-06 21:58:52 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-07-06 21:58:52 +0000
commitd1a002d40d48ad14d45b48c55fb113c8f8885a42 (patch)
tree18e79c1489c3c5b1af8f012b7f6eec247548ebc7 /opcode.pl
parentbb6014b304fce37516ed7fc833a452e821fb367f (diff)
downloadperl-d1a002d40d48ad14d45b48c55fb113c8f8885a42.tar.gz
undo ck_sysread() changes#1319,1337 in preparation for a much
simpler fix p4raw-link: @1337 on //depot/perl: 77808da1249dc49b6d1ea4171ebce9989b18ea3f p4raw-link: @1319 on //depot/perl: 5081475eefaf24307ce7eaf4c87aafd588b37e98 p4raw-id: //depot/perl@1345
Diffstat (limited to 'opcode.pl')
-rwxr-xr-xopcode.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/opcode.pl b/opcode.pl
index 6a1275d151..5891139a44 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -496,7 +496,7 @@ sselect select system call ck_select t@ S S S S
select select ck_select st@ F?
getc getc ck_eof st% F?
-read read ck_sysread imst@ F R S S?
+read read ck_fun imst@ F R S S?
enterwrite write ck_fun dis% F?
leavewrite write exit ck_null 1
@@ -505,11 +505,11 @@ print print ck_listiob ims@ F? L
sysopen sysopen ck_fun s@ F S S S?
sysseek sysseek ck_fun s@ F S S
-sysread sysread ck_sysread imst@ F R S S?
+sysread sysread ck_fun imst@ F R S S?
syswrite syswrite ck_fun imst@ F S S S?
send send ck_fun imst@ F S S S?
-recv recv ck_sysread imst@ F R S S
+recv recv ck_fun imst@ F R S S
eof eof ck_eof is% F?
tell tell ck_fun st% F?