[perl #16895] [PATCH] core.ops, ops2c.pl

# New Ticket Created by  Leopold Toetsch 
# Please include the string:  [perl #16895]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt2/Ticket/Display.html?id=16895 >


1)

The following code snippet, appended to anyop.c

     strcpy(name, "shl_p_p_ic");
     op = op_find_exact(name);
     if (!same_op(op, NULLOP)) {
	printf("%s found: = ", name);
	info = op_info(op);
	printf("%s\n",info->full_name);
     }

gives this:

$ cc -DTEST=1 -I../../include anyop.c -o anyop -ldl && ./anyop
shl_p_p_ic found: = shr_i_i_ic

i.e. non existing ops are found.

2) find_op should really not exit, when asked for non existing ops.

3) IN/OUT (same as last patch)

4) set P[k], i

Here probably P should be a IN argument, because P itself is neither 
created nor changed, just the array/hash contents is changed.
Currently only the JITters and imcc are using this flags, so, it should 
be discussed, what OUT really means.

(imcc generates now almost all of the code with help from op_info_table)

leo


-- attachment  1 ------------------------------------------------------
url: http://rt.perl.org/rt2/attach/36172/29258/636b7d/ops2c.pl.diff

-- attachment  2 ------------------------------------------------------
url: http://rt.perl.org/rt2/attach/36172/29259/1a7b6c/core.ops.diff

• [perl #16895] [PATCH] core.ops, ops2c.pl by Leopold Toetsch
• Re: [perl #16895] [PATCH] core.ops, ops2c.pl by Mike Lambert