diff options
author | Gisle Aas <gisle@aas.no> | 1998-02-24 00:36:09 +0100 |
---|---|---|
committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-02-25 15:27:06 +0000 |
commit | 0fa190096f28eaa3c2a08a9aa7c333cd24617fd7 (patch) | |
tree | 740bac305fea94d9edfa4b4745e5fbf9c54ad3eb /regcomp.c | |
parent | 3238f5fe6293a28fd91d4f803f3a2df14d3a9498 (diff) | |
download | perl-0fa190096f28eaa3c2a08a9aa7c333cd24617fd7.tar.gz |
#ifdef CAN_PROTOTYPE cleanup
p4raw-id: //depot/perl@581
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 25 |
1 files changed, 0 insertions, 25 deletions
@@ -2045,12 +2045,7 @@ nextchar(void) - reg_node - emit a node */ static regnode * /* Location. */ -#ifdef CAN_PROTOTYPE reg_node(U8 op) -#else -reg_node(op) -U8 op; -#endif { register regnode *ret; register regnode *ptr; @@ -2078,13 +2073,7 @@ U8 op; - reganode - emit a node with an argument */ static regnode * /* Location. */ -#ifdef CAN_PROTOTYPE reganode(U8 op, U32 arg) -#else -reganode(op, arg) -U8 op; -U32 arg; -#endif { register regnode *ret; register regnode *ptr; @@ -2111,15 +2100,8 @@ U32 arg; /* - regc - emit (if appropriate) a byte of code */ -#ifdef CAN_PROTOTYPE static void regc(U8 b, char* s) -#else -static void -regc(b, s) -U8 b; -char *s; -#endif { if (!SIZE_ONLY) *s = b; @@ -2130,15 +2112,8 @@ char *s; * * Means relocating the operand. */ -#ifdef CAN_PROTOTYPE static void reginsert(U8 op, regnode *opnd) -#else -static void -reginsert(op, opnd) -U8 op; -regnode *opnd; -#endif { register regnode *src; register regnode *dst; |