summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorGisle Aas <gisle@aas.no>1998-02-24 00:36:09 +0100
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1998-02-25 15:27:06 +0000
commit0fa190096f28eaa3c2a08a9aa7c333cd24617fd7 (patch)
tree740bac305fea94d9edfa4b4745e5fbf9c54ad3eb /regcomp.c
parent3238f5fe6293a28fd91d4f803f3a2df14d3a9498 (diff)
downloadperl-0fa190096f28eaa3c2a08a9aa7c333cd24617fd7.tar.gz
#ifdef CAN_PROTOTYPE cleanup
p4raw-id: //depot/perl@581
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c25
1 files changed, 0 insertions, 25 deletions
diff --git a/regcomp.c b/regcomp.c
index a958971f15..55576d0bf1 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -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;