add ck_sysread() for better sysread/read/recv sanity

p4raw-id: //depot/perl@1319

1 files changed, 3 insertions, 3 deletions

diff --git a/globals.c b/globals.c
index 1daf4f1833..217ac6df52 100644
--- a/globals.c
+++ b/globals.c
@@ -898,17 +898,17 @@ OP * (CPERLscope(*check)[]) _((OP *op)) = {
 	ck_select,	/* sselect */
 	ck_select,	/* select */
 	ck_eof,		/* getc */
-	ck_fun,		/* read */
+	ck_sysread,	/* read */
 	ck_fun,		/* enterwrite */
 	ck_null,	/* leavewrite */
 	ck_listiob,	/* prtf */
 	ck_listiob,	/* print */
 	ck_fun,		/* sysopen */
 	ck_fun,		/* sysseek */
-	ck_fun,		/* sysread */
+	ck_sysread,	/* sysread */
 	ck_fun,		/* syswrite */
 	ck_fun,		/* send */
-	ck_fun,		/* recv */
+	ck_sysread,	/* recv */
 	ck_eof,		/* eof */
 	ck_fun,		/* tell */
 	ck_fun,		/* seek */