X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=x2p%2Fa2p.h;h=3457c43328bb301226ff2833760cba690b93ba07;hb=ae7638f4d1ab4edf2eef64922c6d042904d21153;hp=392e9e66a223dd9a64822dcff9797342765645e5;hpb=092bebab2f702b0ac392b3259fc90294ab403f4b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/x2p/a2p.h b/x2p/a2p.h index 392e9e6..3457c43 100644 --- a/x2p/a2p.h +++ b/x2p/a2p.h @@ -1,6 +1,6 @@ /* $RCSfile: a2p.h,v $$Revision: 4.1 $$Date: 92/08/07 18:29:09 $ * - * Copyright (c) 1991-1997, Larry Wall + * Copyright (c) 1991-2002, Larry Wall * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. @@ -16,6 +16,8 @@ #ifdef VMS # include "config.h" +#elif defined(NETWARE) +# include "../NetWare/config.h" #else # include "../config.h" #endif @@ -73,13 +75,11 @@ #define MEM_SIZE Size_t -#ifdef STANDARD_C -# include -#else - Malloc_t malloc _((MEM_SIZE nbytes)); - Malloc_t calloc _((MEM_SIZE elements, MEM_SIZE size)); - Malloc_t realloc _((Malloc_t where, MEM_SIZE nbytes)); - Free_t free _((Malloc_t where)); +#ifndef STANDARD_C + Malloc_t malloc (MEM_SIZE nbytes); + Malloc_t calloc (MEM_SIZE elements, MEM_SIZE size); + Malloc_t realloc (Malloc_t where, MEM_SIZE nbytes); + Free_t free (Malloc_t where); #endif #if defined(I_STRING) || defined(__cplusplus) @@ -88,19 +88,11 @@ # include #endif -#if !defined(HAS_BCOPY) || defined(__cplusplus) -# define bcopy(s1,s2,l) memcpy(s2,s1,l) -#endif -#if !defined(HAS_BZERO) || defined(__cplusplus) -# define bzero(s,l) memset(s,0,l) -#endif - #if !defined(HAS_STRCHR) && defined(HAS_INDEX) && !defined(strchr) #define strchr index #define strrchr rindex #endif - #ifdef I_TIME # include #endif @@ -123,6 +115,7 @@ #ifdef DOSISH # if defined(OS2) +# define PTHX_UNUSED # include "../os2ish.h" # else # include "../dosish.h" @@ -371,7 +364,7 @@ EXT char *No INIT(""); #define str_true(str) (Str = (str), (Str->str_pok ? True(Str->str_ptr) : (Str->str_nok ? (Str->str_nval != 0.0) : 0 ))) -#define str_peek(str) (Str = (str), (Str->str_pok ? Str->str_ptr : (Str->str_nok ? (sprintf(buf,"num(%g)",Str->str_nval),buf) : "" ))) +#define str_peek(str) (Str = (str), (Str->str_pok ? Str->str_ptr : (Str->str_nok ? (sprintf(buf,"num(%"NVgf")",Str->str_nval),buf) : "" ))) #define str_get(str) (Str = (str), (Str->str_pok ? Str->str_ptr : str_2ptr(Str))) #define str_gnum(str) (Str = (str), (Str->str_nok ? Str->str_nval : str_2num(Str))) EXT STR *Str; @@ -379,27 +372,27 @@ EXT STR *Str; #define GROWSTR(pp,lp,len) if (*(lp) < (len)) growstr(pp,lp,len) /* Prototypes for things in a2p.c */ -int aryrefarg _(( int arg )); -int bl _(( int arg, int maybe )); -void dump _(( int branch )); -int fixfargs _(( int name, int arg, int prevargs )); -int fixrargs _(( char *name, int arg, int prevargs )); -void fixup _(( STR *str )); -int numary _(( int arg )); -int oper0 _(( int type )); -int oper1 _(( int type, int arg1 )); -int oper2 _(( int type, int arg1, int arg2 )); -int oper3 _(( int type, int arg1, int arg2, int arg3 )); -int oper4 _(( int type, int arg1, int arg2, int arg3, int arg4 )); -int oper5 _(( int type, int arg1, int arg2, int arg3, int arg4, int arg5 )); -void putlines _(( STR *str )); -void putone _(( void )); -int rememberargs _(( int arg )); -char * scannum _(( char *s )); -char * scanpat _(( char *s )); -int string _(( char *ptr, int len )); -void yyerror _(( char *s )); -int yylex _(( void )); +int aryrefarg ( int arg ); +int bl ( int arg, int maybe ); +void dump ( int branch ); +int fixfargs ( int name, int arg, int prevargs ); +int fixrargs ( char *name, int arg, int prevargs ); +void fixup ( STR *str ); +int numary ( int arg ); +int oper0 ( int type ); +int oper1 ( int type, int arg1 ); +int oper2 ( int type, int arg1, int arg2 ); +int oper3 ( int type, int arg1, int arg2, int arg3 ); +int oper4 ( int type, int arg1, int arg2, int arg3, int arg4 ); +int oper5 ( int type, int arg1, int arg2, int arg3, int arg4, int arg5 ); +void putlines ( STR *str ); +void putone ( void ); +int rememberargs ( int arg ); +char * scannum ( char *s ); +char * scanpat ( char *s ); +int string ( char *ptr, int len ); +void yyerror ( char *s ); +int yylex ( void ); EXT int line INIT(0);