From: H.Merijn Brand Date: Wed, 25 Oct 2000 12:02:20 +0000 (+0200) Subject: patch 7416 breaks sv.c on AIX and HP-UX (patch included) X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bd0e0981ad1b91dd1e1d75c33e1e405c39ceca34;p=p5sagit%2Fp5-mst-13.2.git patch 7416 breaks sv.c on AIX and HP-UX (patch included) Message-Id: <20001025114712.C9F9.H.M.BRAND@hccnet.nl> p4raw-id: //depot/perl@7433 --- diff --git a/perlsdio.h b/perlsdio.h index 90ca534..6ce82d8 100644 --- a/perlsdio.h +++ b/perlsdio.h @@ -110,11 +110,11 @@ #ifdef STDIO_PTR_LVALUE #ifdef STDIO_PTR_LVAL_NOCHANGE_CNT -#define PerlIO_set_ptrcnt(f,p,c) STMT_START {FILE_ptr(f) = (p), PerlIO_set_cnt(f,c)} STMT_END +#define PerlIO_set_ptrcnt(f,p,c) STMT_START {FILE_ptr(f) = (p), PerlIO_set_cnt(f,c);} STMT_END #else #ifdef STDIO_PTR_LVAL_SETS_CNT /* assert() may pre-process to ""; potential syntax error (FILE_ptr(), ) */ -#define PerlIO_set_ptrcnt(f,p,c) STMT_START {FILE_ptr(f) = (p); assert(FILE_cnt(f) == (c))} STMT_END +#define PerlIO_set_ptrcnt(f,p,c) STMT_START {FILE_ptr(f) = (p); assert(FILE_cnt(f) == (c));} STMT_END #define PerlIO_fast_gets(f) 1 #else #define PerlIO_set_ptrcnt(f,p,c) abort()