summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorPerl 5 Porters <perl5-porters@africa.nicoh.com>1996-02-02 18:52:27 -0800
committerLarry Wall <lwall@sems.com>1996-02-02 18:52:27 -0800
commitc07a80fdfe3926b5eb0585b674aa5d1f57b32ade (patch)
tree6d56135571eb9ea6635748469bdaf72ad481247a /proto.h
parent91b7def858c29dac014df40946a128c06b3aa2ed (diff)
downloadperl-c07a80fdfe3926b5eb0585b674aa5d1f57b32ade.tar.gz
perl5.002beta3
[editor's note: no patch file was found for this release, so no fine-grained changes] I can't find the password for our ftp server, so I had to drop it into ftp://ftp.sems.com/pub/incoming/perl5.002b3.tar.gz, which is a drop directory you can't ls. The current plan is that Andy is gonna whack on this a little more, and then release a gamma in a few days when he's happy with it. So don't get carried away. This is now *late* beta. In other words, have less than the appropriate amount of fun. :-) Larry
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h13
1 files changed, 5 insertions, 8 deletions
diff --git a/proto.h b/proto.h
index 1cfa1f3dcc..d92ac1a2d6 100644
--- a/proto.h
+++ b/proto.h
@@ -80,7 +80,8 @@ OP* do_kv _((void));
I32 do_msgrcv _((SV** mark, SV** sp));
I32 do_msgsnd _((SV** mark, SV** sp));
#endif
-bool do_open _((GV* gv, char* name, I32 len, FILE* supplied_fp));
+bool do_open _((GV* gv, char* name, I32 len,
+ int as_raw, int rawmode, int rawperm, FILE* supplied_fp));
void do_pipe _((SV* sv, GV* rgv, GV* wgv));
bool do_print _((SV* sv, FILE* fp));
OP * do_readline _((void));
@@ -103,6 +104,7 @@ int dump_fds _((char* s));
#endif
void dump_form _((GV* gv));
void dump_gv _((GV* gv));
+void dump_mstats _((char* s));
void dump_op _((OP* arg));
void dump_pm _((PMOP* pm));
void dump_packsubs _((HV* stash));
@@ -210,9 +212,6 @@ void mg_magical _((SV* sv));
int mg_set _((SV* sv));
OP* mod _((OP* op, I32 type));
char* moreswitches _((char* s));
-#ifdef MSTATS
-void mstats _((char* s));
-#endif
OP * my _(( OP *));
char* my_bcopy _((char* from, char* to, I32 len));
#if !defined(HAS_BZERO) && !defined(HAS_MEMSET)
@@ -243,7 +242,6 @@ OP* newFOROP _((I32 flags, char* label, line_t forline, OP* scalar, OP* expr, OP
OP* newLOGOP _((I32 optype, I32 flags, OP* left, OP* right));
OP* newLOOPEX _((I32 type, OP* label));
OP* newLOOPOP _((I32 flags, I32 debuggable, OP* expr, OP* block));
-OP* newMETHOD _((OP* ref, OP* name));
OP* newNULLLIST _((void));
OP* newOP _((I32 optype, I32 flags));
void newPROG _((OP* op));
@@ -258,8 +256,7 @@ CV* newXSUB _((char *name, I32 ix, I32 (*subaddr)(int,int,int), char *filename))
AV* newAV _((void));
OP* newAVREF _((OP* o));
OP* newBINOP _((I32 type, I32 flags, OP* first, OP* last));
-OP* newCVREF _((OP* o));
-OP* newCVOP _((I32 type, I32 flags, CV* cv, OP* cont));
+OP* newCVREF _((I32 flags, OP* o));
OP* newGVOP _((I32 type, I32 flags, GV* gv));
GV* newGVgen _((char *pack));
OP* newGVREF _((I32 type, OP* o));
@@ -459,7 +456,7 @@ void taint_proper _((char* f, char* s));
#ifdef UNLINK_ALL_VERSIONS
I32 unlnk _((char* f));
#endif
-void utilize _((int aver, OP* id, OP* arg));
+void utilize _((int aver, I32 floor, OP* id, OP* arg));
I32 wait4pid _((int pid, int* statusp, int flags));
void warn _((char* pat,...)) __attribute__((format(printf,1,2)));
void watch _((char **addr));