diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-09-18 04:19:25 +0300 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-09-26 09:15:55 +0000 |
| commit | 93189314521460c01625b05f7cfa81ac855affa9 (patch) | |
| tree | 0daf409e1e27efb5bda55df447292e5f02193f4a /pp_hot.c | |
| parent | a29f6d035abe7b06489dad2706479b252a072f02 (diff) | |
| download | perl-93189314521460c01625b05f7cfa81ac855affa9.tar.gz | |
enable -ansi -pedantic
Message-ID: <20020917221925.GF85044@lyta.hut.fi>
p4raw-id: //depot/perl@17925
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -607,7 +607,7 @@ PP(pp_print) goto had_magic; if (ckWARN2(WARN_UNOPENED,WARN_CLOSED)) report_evil_fh(gv, io, PL_op->op_type); - SETERRNO(EBADF,RMS$_IFI); + SETERRNO(EBADF,RMS_IFI); goto just_say_no; } else if (!(fp = IoOFP(io))) { @@ -617,7 +617,7 @@ PP(pp_print) else if (ckWARN2(WARN_UNOPENED,WARN_CLOSED)) report_evil_fh(gv, io, PL_op->op_type); } - SETERRNO(EBADF,IoIFP(io)?RMS$_FAC:RMS$_IFI); + SETERRNO(EBADF,IoIFP(io)?RMS_FAC:RMS_IFI); goto just_say_no; } else { |