diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-01-20 19:42:30 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-01-20 19:42:30 +0000 |
| commit | a567e93b903bc9849952c06533059c2f2e2fb226 (patch) | |
| tree | a93a49d4b98bf39c527f7d33fb2568de0fc2c201 /opcode.h | |
| parent | 3b6eb69b03afe7feeb11252d06d9daecc9c262f1 (diff) | |
| download | perl-a567e93b903bc9849952c06533059c2f2e2fb226.tar.gz | |
Infrastructure to allow:
open($fh,"|-",@array);
to be implemented
i.e. mark pp_open as needing a stack mark, and make pp_open
process its args in that style (and pass them _all_ to tied handles OPEN).
Invent do_openn() which takes SV ** at allow it to see multiple args.
Note this does not _do_ anything yet.
p4raw-id: //depot/perlio@8484
Diffstat (limited to 'opcode.h')
| -rw-r--r-- | opcode.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1,4 +1,4 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! +/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! This file is built by opcode.pl from its data. Any changes made here will be lost! */ @@ -1643,7 +1643,7 @@ EXT U32 PL_opargs[] = { 0x00001a44, /* dump */ 0x00001a44, /* goto */ 0x00013644, /* exit */ - 0x0052c81c, /* open */ + 0x0052c81d, /* open */ 0x0001d614, /* close */ 0x000cc814, /* pipe_op */ 0x0000d61c, /* fileno */ |