[perl #40834] [BUG] - PMC methods aren't inherited to PIR subclasses

2006-11-12 Thread via RT
# New Ticket Created by  Patrick R. Michaud 
# Please include the string:  [perl #40834]
# in the subject line of all future correspondence about this issue. 
# URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40834 


If a METHOD is defined in a *.pmc file, that METHOD is not
automatically inherited by PIR-based subclasses.

$ cat zzz.pir
.sub main :main
$P0 = new 'String'
$P0 = 'Hello'
$P0.'replace'('e', 'a')
say $P0

$P99 = subclass 'String', 'Foo'

$P1 = new 'Foo'
$P1 = 'Hello'
$P1.'replace'('e', 'a')
say $P1

.end
$ ./parrot zzz.pir
Hallo
Segmentation fault
$   
  
Pm


[perl #40818] [PATCH] Silence warning in t/library/pcre.t

2006-11-12 Thread Paul Cochrane via RT
Thanks, applied (only slightly modifie) as r15442.



[perl #40803] [BUG] 'make' fails on Darwin at -lgmp

2006-11-12 Thread James Keenan via RT
On Sat Nov 11 03:56:22 2006, [EMAIL PROTECTED] wrote:
 I believe that the attachment containing your make output was truncated.
 Can you try again or just inline the make error(s)?
 
 Thanks,

It should be noted that I upgraded to GMP 4.2.1. before trying to build Parrot 
(or, more 
precisely, after the first attempt at building Parrot failed).  This is not the 
first time I've had 
problems with GMP; see http://perlmonks.org/?node_id=543267.

The attachments reflect having taken Jerry's suggestion and done a 'make clean'.

jimk
Compiling with:
xx.c
cc -I./include -fno-common -no-cpp-precomp -pipe -I/usr/local/include -pipe 
-fno-common -Wno-long-double -g -W -Wall -Wstrict-prototypes 
-Wmissing-prototypes -Winline -Wpointer-arith -Wcast-qual -Wwrite-strings 
-Waggregate-return -Winline -Wno-unused -Wsign-compare -falign-functions=16 
-Wformat-nonliteral -Wformat-security -Wpacked -Wdisabled-optimization 
-Wno-shadow -DHAS_JIT -DPPC -DHAVE_COMPUTED_GOTO -I. -o xx.o -c xx.c
perl tools/build/ops2pm.pl src/ops/core.ops src/ops/bit.ops src/ops/cmp.ops 
src/ops/debug.ops src/ops/experimental.ops src/ops/io.ops src/ops/math.ops 
src/ops/object.ops src/ops/pic.ops src/ops/pmc.ops src/ops/python.ops 
src/ops/set.ops src/ops/stack.ops src/ops/stm.ops src/ops/string.ops 
src/ops/sys.ops src/ops/var.ops 
perl tools/build/ops2c.pl C --core
perl tools/build/vtable_h.pl
perl tools/build/ops2c.pl CSwitch --core
perl tools/build/vtable_extend.pl
perl tools/build/ops2c.pl CGoto --core
perl tools/build/ops2c.pl CGP --core
src/ops/core_ops.c
src/ops/core_ops_switch.c
src/ops/core_ops_cg.c
src/ops/core_ops_cgp.c
perl -MExtUtils::Command -e cp src/jit/ppc/jit_emit.h src/jit_emit.h
src/exec.c
perl tools/build/jit2c.pl ppc src/exec_cpu.c
jit2c: JITed 144 (+ 141 vtable) of 1254 ops
src/exec_cpu.c
src/exec_save.c
src/charset.c
src/encoding.c
src/exceptions.c
perl tools/build/c2str.pl src/global_setup.c  src/global_setup.str
src/global_setup.c
src/interpreter.c
perl tools/build/c2str.pl src/inter_call.c  src/inter_call.str
src/inter_call.c
perl tools/build/c2str.pl src/inter_cb.c  src/inter_cb.str
src/inter_cb.c
src/inter_create.c
perl tools/build/c2str.pl src/inter_misc.c  src/inter_misc.str
src/inter_misc.c
src/inter_run.c
src/register.c
src/memory.c
perl tools/build/c2str.pl src/objects.c  src/objects.str
src/objects.c
src/packfile.c
src/stacks.c
src/stack_common.c
perl tools/build/c2str.pl src/builtin.c  src/builtin.str
perl tools/build/c2str.pl src/global.c  src/global.str
perl tools/build/c2str.pl src/library.c  src/library.str
perl tools/build/c2str.pl src/mmd.c  src/mmd.str
perl tools/build/c2str.pl src/pmc.c  src/pmc.str
perl tools/build/c2str.pl src/spf_render.c  src/spf_render.str
perl tools/build/c2str.pl src/spf_vtable.c  src/spf_vtable.str
perl tools/build/pmc2c.pl --vtable
perl tools/build/pmc2c.pl --dump src/pmc/default.pmc 
perl tools/build/pmc2c.pl --c src/pmc/default.pmc
perl tools/build/c2str.pl src/pmc/default.c  src/pmc/default.str
perl tools/build/pmc2c.pl --dump src/pmc/null.pmc 
perl tools/build/pmc2c.pl --c src/pmc/null.pmc
perl tools/build/c2str.pl src/pmc/null.c  src/pmc/null.str
perl tools/build/pmc2c.pl --dump src/pmc/env.pmc 
perl tools/build/pmc2c.pl --c src/pmc/env.pmc
perl tools/build/c2str.pl src/pmc/env.c  src/pmc/env.str
perl tools/build/pmc2c.pl --dump src/pmc/key.pmc 
perl tools/build/pmc2c.pl --c src/pmc/key.pmc
perl tools/build/c2str.pl src/pmc/key.c  src/pmc/key.str
perl tools/build/pmc2c.pl --dump src/pmc/random.pmc 
perl tools/build/pmc2c.pl --c src/pmc/random.pmc
perl tools/build/c2str.pl src/pmc/random.c  src/pmc/random.str
perl tools/build/pmc2c.pl --dump src/pmc/unmanagedstruct.pmc 
perl tools/build/pmc2c.pl --c src/pmc/unmanagedstruct.pmc
perl tools/build/c2str.pl src/pmc/unmanagedstruct.c  
src/pmc/unmanagedstruct.str
perl tools/build/pmc2c.pl --dump src/pmc/managedstruct.pmc 
perl tools/build/pmc2c.pl --c src/pmc/managedstruct.pmc
perl tools/build/c2str.pl src/pmc/managedstruct.c  src/pmc/managedstruct.str
perl tools/build/pmc2c.pl --dump src/pmc/delegate.pmc 
perl tools/build/pmc2c.pl --c src/pmc/delegate.pmc
perl tools/build/c2str.pl src/pmc/delegate.c  src/pmc/delegate.str
perl tools/build/pmc2c.pl --dump src/pmc/csub.pmc 
perl tools/build/pmc2c.pl --c src/pmc/csub.pmc
perl tools/build/c2str.pl src/pmc/csub.c  src/pmc/csub.str
perl tools/build/pmc2c.pl --dump src/pmc/nci.pmc 
perl tools/build/pmc2c.pl --dump src/pmc/compiler.pmc 
perl tools/build/pmc2c.pl --c src/pmc/compiler.pmc
perl tools/build/c2str.pl src/pmc/compiler.c  src/pmc/compiler.str
perl tools/build/pmc2c.pl --dump src/pmc/fixedpmcarray.pmc 
perl tools/build/pmc2c.pl --dump src/pmc/resizablepmcarray.pmc 
perl tools/build/pmc2c.pl --dump src/pmc/exception.pmc 
perl tools/build/pmc2c.pl --c src/pmc/exception.pmc
perl tools/build/c2str.pl src/pmc/exception.c  src/pmc/exception.str
perl tools/build/pmc2c.pl --dump src/pmc/version.pmc 
perl tools/build/pmc2c.pl --c src/pmc/version.pmc
perl tools/build/c2str.pl 

Re: [perl #40803] [BUG] 'make' fails on Darwin at -lgmp

2006-11-12 Thread James Keenan

Joshua Hoblitt wrote:

 I believe that the attachment containing your make output was  
truncated.

 Can you try again or just inline the make error(s)?

 Thanks,

 -J

At Jerry Gay's suggestion, I did a 'make clean' and started anew.

Compiling with:
xx.c
cc -I./include -fno-common -no-cpp-precomp -pipe -I/usr/local/include  
-pipe -fno-common -Wno-long-double -g -W -Wall -Wstrict-prototypes - 
Wmissing-prototypes -Winline -Wpointer-arith -Wcast-qual -Wwrite- 
strings -Waggregate-return -Winline -Wno-unused -Wsign-compare - 
falign-functions=16 -Wformat-nonliteral -Wformat-security -Wpacked - 
Wdisabled-optimization -Wno-shadow -DHAS_JIT -DPPC - 
DHAVE_COMPUTED_GOTO -I. -o xx.o -c xx.c
perl tools/build/ops2pm.pl src/ops/core.ops src/ops/bit.ops src/ops/ 
cmp.ops src/ops/debug.ops src/ops/experimental.ops src/ops/io.ops src/ 
ops/math.ops src/ops/object.ops src/ops/pic.ops src/ops/pmc.ops src/ 
ops/python.ops src/ops/set.ops src/ops/stack.ops src/ops/stm.ops src/ 
ops/string.ops src/ops/sys.ops src/ops/var.ops

perl tools/build/ops2c.pl C --core
perl tools/build/vtable_h.pl
perl tools/build/ops2c.pl CSwitch --core
perl tools/build/vtable_extend.pl
perl tools/build/ops2c.pl CGoto --core
perl tools/build/ops2c.pl CGP --core
src/ops/core_ops.c
src/ops/core_ops_switch.c
src/ops/core_ops_cg.c
src/ops/core_ops_cgp.c
perl -MExtUtils::Command -e cp src/jit/ppc/jit_emit.h src/jit_emit.h
src/exec.c
perl tools/build/jit2c.pl ppc src/exec_cpu.c
jit2c: JITed 144 (+ 141 vtable) of 1254 ops
src/exec_cpu.c
src/exec_save.c
src/charset.c
src/encoding.c
src/exceptions.c
perl tools/build/c2str.pl src/global_setup.c  src/global_setup.str
src/global_setup.c
src/interpreter.c
perl tools/build/c2str.pl src/inter_call.c  src/inter_call.str
src/inter_call.c
perl tools/build/c2str.pl src/inter_cb.c  src/inter_cb.str
src/inter_cb.c
src/inter_create.c
perl tools/build/c2str.pl src/inter_misc.c  src/inter_misc.str
src/inter_misc.c
src/inter_run.c
src/register.c
src/memory.c
perl tools/build/c2str.pl src/objects.c  src/objects.str
src/objects.c
src/packfile.c
src/stacks.c
src/stack_common.c
perl tools/build/c2str.pl src/builtin.c  src/builtin.str
perl tools/build/c2str.pl src/global.c  src/global.str
perl tools/build/c2str.pl src/library.c  src/library.str
perl tools/build/c2str.pl src/mmd.c  src/mmd.str
perl tools/build/c2str.pl src/pmc.c  src/pmc.str
perl tools/build/c2str.pl src/spf_render.c  src/spf_render.str
perl tools/build/c2str.pl src/spf_vtable.c  src/spf_vtable.str
perl tools/build/pmc2c.pl --vtable
perl tools/build/pmc2c.pl --dump src/pmc/default.pmc
perl tools/build/pmc2c.pl --c src/pmc/default.pmc
perl tools/build/c2str.pl src/pmc/default.c  src/pmc/default.str
perl tools/build/pmc2c.pl --dump src/pmc/null.pmc
perl tools/build/pmc2c.pl --c src/pmc/null.pmc
perl tools/build/c2str.pl src/pmc/null.c  src/pmc/null.str
perl tools/build/pmc2c.pl --dump src/pmc/env.pmc
perl tools/build/pmc2c.pl --c src/pmc/env.pmc
perl tools/build/c2str.pl src/pmc/env.c  src/pmc/env.str
perl tools/build/pmc2c.pl --dump src/pmc/key.pmc
perl tools/build/pmc2c.pl --c src/pmc/key.pmc
perl tools/build/c2str.pl src/pmc/key.c  src/pmc/key.str
perl tools/build/pmc2c.pl --dump src/pmc/random.pmc
perl tools/build/pmc2c.pl --c src/pmc/random.pmc
perl tools/build/c2str.pl src/pmc/random.c  src/pmc/random.str
perl tools/build/pmc2c.pl --dump src/pmc/unmanagedstruct.pmc
perl tools/build/pmc2c.pl --c src/pmc/unmanagedstruct.pmc
perl tools/build/c2str.pl src/pmc/unmanagedstruct.c  src/pmc/ 
unmanagedstruct.str

perl tools/build/pmc2c.pl --dump src/pmc/managedstruct.pmc
perl tools/build/pmc2c.pl --c src/pmc/managedstruct.pmc
perl tools/build/c2str.pl src/pmc/managedstruct.c  src/pmc/ 
managedstruct.str

perl tools/build/pmc2c.pl --dump src/pmc/delegate.pmc
perl tools/build/pmc2c.pl --c src/pmc/delegate.pmc
perl tools/build/c2str.pl src/pmc/delegate.c  src/pmc/delegate.str
perl tools/build/pmc2c.pl --dump src/pmc/csub.pmc
perl tools/build/pmc2c.pl --c src/pmc/csub.pmc
perl tools/build/c2str.pl src/pmc/csub.c  src/pmc/csub.str
perl tools/build/pmc2c.pl --dump src/pmc/nci.pmc
perl tools/build/pmc2c.pl --dump src/pmc/compiler.pmc
perl tools/build/pmc2c.pl --c src/pmc/compiler.pmc
perl tools/build/c2str.pl src/pmc/compiler.c  src/pmc/compiler.str
perl tools/build/pmc2c.pl --dump src/pmc/fixedpmcarray.pmc
perl tools/build/pmc2c.pl --dump src/pmc/resizablepmcarray.pmc
perl tools/build/pmc2c.pl --dump src/pmc/exception.pmc
perl tools/build/pmc2c.pl --c src/pmc/exception.pmc
perl tools/build/c2str.pl src/pmc/exception.c  src/pmc/exception.str
perl tools/build/pmc2c.pl --dump src/pmc/version.pmc
perl tools/build/pmc2c.pl --c src/pmc/version.pmc
perl tools/build/c2str.pl src/pmc/version.c  src/pmc/version.str
perl tools/build/pmc2c.pl --dump src/pmc/vtablecache.pmc
perl tools/build/pmc2c.pl --c src/pmc/vtablecache.pmc
perl tools/build/c2str.pl src/pmc/vtablecache.c  src/pmc/ 
vtablecache.str

perl tools/build/pmc2c.pl --dump src/pmc/parrotio.pmc
perl tools/build/pmc2c.pl 

[perl #40816] open opcode creates file if it doesn't exist

2006-11-12 Thread via RT
# New Ticket Created by  Jonathan Rockway 
# Please include the string:  [perl #40816]
# in the subject line of all future correspondence about this issue. 
# URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40816 


Not sure if this is a bug or not, but I noticed that the open opcode
creates its argument if the desired file doesn't exist.  Here's a test
case:

.sub main :main
  .param pmc args
  .local pmc file
  $S0 = shift args # script name
  $S0 = shift args # first argument
  file = open $S0
  end
.end

Run as parrot test.pir filename.  If filename doesn't exist, it
will be created.

BTW, this is my first PIR script, so please be gentle :)

Regards,
Jonathan Rockway


[perl #40803] [BUG] 'make' fails on Darwin at -lgmp

2006-11-12 Thread James Keenan via RT
Next attempt:  At Jerry's and Chip's suggestions, we tried a different 
configuration:

perl Configure.pl --without-gmp --cc=gcc --ccflags=-DAN

where 'AN' was intended to be a harmless option for --ccflags.

This time, 'make' got a few lines farther; see attachment.
Compiling with:
xx.c
gcc -I./include -DAN -g -W -Wall -Wstrict-prototypes -Wmissing-prototypes 
-Winline -Wpointer-arith -Wcast-qual -Wwrite-strings -Waggregate-return 
-Winline -Wno-unused -Wsign-compare -falign-functions=16 -Wformat-nonliteral 
-Wformat-security -Wpacked -Wdisabled-optimization -Wno-shadow -DHAS_JIT -DPPC 
-DHAVE_COMPUTED_GOTO -I. -o xx.o -c xx.c
perl tools/build/ops2pm.pl src/ops/core.ops src/ops/bit.ops src/ops/cmp.ops 
src/ops/debug.ops src/ops/experimental.ops src/ops/io.ops src/ops/math.ops 
src/ops/object.ops src/ops/pic.ops src/ops/pmc.ops src/ops/python.ops 
src/ops/set.ops src/ops/stack.ops src/ops/stm.ops src/ops/string.ops 
src/ops/sys.ops src/ops/var.ops 
gcd_i_n_n   1214experimental, not in ops.num
gcd_i_nc_n  1215experimental, not in ops.num
gcd_i_n_nc  1216experimental, not in ops.num
gcd_i_nc_nc 1217experimental, not in ops.num
gcd_i_i_i_i_i   1218experimental, not in ops.num
gcd_i_i_i_ic_i  1219experimental, not in ops.num
gcd_i_i_i_i_ic  1220experimental, not in ops.num
gcd_i_i_i_ic_ic 1221experimental, not in ops.num
splice_p_p_i_i  1222experimental, not in ops.num
splice_p_p_ic_i 1223experimental, not in ops.num
splice_p_p_i_ic 1224experimental, not in ops.num
splice_p_p_ic_ic1225experimental, not in ops.num
slice_p_p_k 1226experimental, not in ops.num
slice_p_p_kc1227experimental, not in ops.num
slice_p_p_k_ic  1228experimental, not in ops.num
slice_p_p_kc_ic 1229experimental, not in ops.num
iter_p_p1230experimental, not in ops.num
morph_p_i   1231experimental, not in ops.num
morph_p_ic  1232experimental, not in ops.num
exec_s  1233experimental, not in ops.num
exec_sc 1234experimental, not in ops.num
classname_p_p   1235experimental, not in ops.num
trap1236experimental, not in ops.num
pow_n_n_i   1237experimental, not in ops.num
pow_n_nc_i  1238experimental, not in ops.num
pow_n_n_ic  1239experimental, not in ops.num
pow_n_nc_ic 1240experimental, not in ops.num
getclass_p_i1241experimental, not in ops.num
getclass_p_ic   1242experimental, not in ops.num
new_p_i_s   1243experimental, not in ops.num
new_p_ic_s  1244experimental, not in ops.num
new_p_i_sc  1245experimental, not in ops.num
new_p_ic_sc 1246experimental, not in ops.num
instantiate_p   1247experimental, not in ops.num
pmcinfo_i_p_ic  1248experimental, not in ops.num
new_p_p 1249experimental, not in ops.num
add_io_event_p_p_p_ic   1250experimental, not in ops.num
need_finalize_p 1251experimental, not in ops.num
runinterp_p_p   1252experimental, not in ops.num
runinterp_p_pc  1253experimental, not in ops.num
setstdout_p SKIPPED: not in ops.num nor ops.skip
setstderr_p SKIPPED: not in ops.num nor ops.skip
adddoes_p_s SKIPPED: not in ops.num nor ops.skip
adddoes_p_scSKIPPED: not in ops.num nor ops.skip
removedoes_p_s  SKIPPED: not in ops.num nor ops.skip
removedoes_p_sc SKIPPED: not in ops.num nor ops.skip
hash_i_pSKIPPED: not in ops.num nor ops.skip
perl tools/build/ops2c.pl C --core
perl tools/build/ops2c.pl CSwitch --core
perl tools/build/vtable_extend.pl
perl tools/build/ops2c.pl CGoto --core
perl tools/build/ops2c.pl CGP --core
src/ops/core_ops.c
src/ops/core_ops_switch.c
src/ops/core_ops_cg.c
src/ops/core_ops_cgp.c
perl -MExtUtils::Command -e cp src/jit/ppc/jit_emit.h src/jit_emit.h
src/exec.c
perl tools/build/jit2c.pl ppc src/exec_cpu.c
jit2c: JITed 144 (+ 141 vtable) of 1254 ops
src/exec_cpu.c
src/exec_save.c
src/charset.c
src/encoding.c
src/exceptions.c
perl tools/build/c2str.pl src/global_setup.c  src/global_setup.str
src/global_setup.c
src/interpreter.c
perl tools/build/c2str.pl src/inter_call.c  src/inter_call.str
src/inter_call.c
perl tools/build/c2str.pl src/inter_cb.c  src/inter_cb.str
src/inter_cb.c
src/inter_create.c
perl tools/build/c2str.pl src/inter_misc.c  src/inter_misc.str
src/inter_misc.c
src/inter_run.c
src/register.c
src/memory.c
perl tools/build/c2str.pl src/objects.c  src/objects.str
src/objects.c
src/packfile.c
src/stacks.c
src/stack_common.c
perl tools/build/c2str.pl src/builtin.c  src/builtin.str
perl tools/build/c2str.pl src/global.c  src/global.str
perl tools/build/c2str.pl src/library.c  src/library.str
perl tools/build/c2str.pl src/mmd.c  src/mmd.str
perl tools/build/c2str.pl src/pmc.c  src/pmc.str
perl tools/build/c2str.pl src/spf_render.c  src/spf_render.str
perl tools/build/c2str.pl src/spf_vtable.c  src/spf_vtable.str
perl tools/build/pmc2c.pl --vtable
perl tools/build/pmc2c.pl 

[perl #40814] [PATCH] Assorted Solaris fixes

2006-11-12 Thread via RT
# New Ticket Created by  Steve Peters 
# Please include the string:  [perl #40814]
# in the subject line of all future correspondence about this issue. 
# URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40814 


The attached patches get Parrot to compile on Solaris, and fixes one
test failure.

Steve Peters
[EMAIL PROTECTED]
--- ./t/pmc/complex.t.old   Sat Nov 11 11:54:01 2006
+++ ./t/pmc/complex.t   Sat Nov 11 11:54:29 2006
@@ -1026,6 +1026,7 @@
 c = .val
 c2 = c.ln()
 str = sprintf %f%+fi, c2
+str = downcase str
 unless str != .res goto .$ok
 print \nln(
 print .val
--- ./src/pmc/capture.pmc.old   Sat Nov 11 07:36:35 2006
+++ ./src/pmc/capture.pmc   Sat Nov 11 07:37:29 2006
@@ -167,42 +167,42 @@
 
 void push_float(FLOATVAL value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_push_float(INTERP, CAPTURE_array(SELF), value);
+VTABLE_push_float(INTERP, CAPTURE_array(SELF), value);
 }
 
 void push_integer(INTVAL value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_push_integer(INTERP, CAPTURE_array(SELF), value);
+VTABLE_push_integer(INTERP, CAPTURE_array(SELF), value);
 }
 
 void push_pmc(PMC *value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_push_pmc(INTERP, CAPTURE_array(SELF), value);
+VTABLE_push_pmc(INTERP, CAPTURE_array(SELF), value);
 }
 
 void push_string(STRING *value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_push_string(INTERP, CAPTURE_array(SELF), value);
+VTABLE_push_string(INTERP, CAPTURE_array(SELF), value);
 }
 
 void unshift_float(FLOATVAL value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_unshift_float(INTERP, CAPTURE_array(SELF), value);
+VTABLE_unshift_float(INTERP, CAPTURE_array(SELF), value);
 }
 
 void unshift_integer(INTVAL value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_unshift_integer(INTERP, CAPTURE_array(SELF), value);
+VTABLE_unshift_integer(INTERP, CAPTURE_array(SELF), value);
 }
 
 void unshift_pmc(PMC *value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_unshift_pmc(INTERP, CAPTURE_array(SELF), value);
+VTABLE_unshift_pmc(INTERP, CAPTURE_array(SELF), value);
 }
 
 void unshift_string(STRING *value) {
 CAPTURE_array_CREATE(INTERP, SELF);
-return VTABLE_unshift_string(INTERP, CAPTURE_array(SELF), value);
+VTABLE_unshift_string(INTERP, CAPTURE_array(SELF), value);
 }
 
 /*


[perl #40815] Summary of 'make test' failures on Darwin

2006-11-12 Thread via RT
# New Ticket Created by  James Keenan 
# Please include the string:  [perl #40815]
# in the subject line of all future correspondence about this issue. 
# URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40815 


perl Configure.pl --without-gmp --cc=gcc --ccflags='-fno-common -pipe  
-I/usr/local/include -pipe -fno-common'

Then chromatic suggested manually editing the Makefile to delete '- 
bundle' from the following line.
LD_LOAD_FLAGS   = -bundle -undefined suppress

make 21 | tee  ~/learn/perl/parrot.make.output.5.txt
make test

Failed Test Stat Wstat Total Fail  List of Failed
---
t/codingstd/tabs.t 1   256 11  1
t/codingstd/trailing_space.t   1   256 11  1
t/compilers/imcc/syn/pcc.t 1   256211  11
t/dynpmc/subclass_with_pir_method.t1   256 21  2
t/examples/library.t   1   256 41  3
t/examples/shootout.t  2   512202  14-15
t/library/pcre.t   1   256 11  1
t/library/pg.t 0 6430  ??
t/op/sprintf.t   308   27  32-33 37-43 194-196
   216-222 225-232
t/pmc/capture.t1   256 91  8
t/pmc/nci.t   59 1510460   59  1-56 58-60
t/pmc/object-meths.t   1   256341  32
t/pmc/parrotinterpreter.t  1   256 31  3
11 tests and 602 subtests skipped.
Failed 13/262 test scripts. 97/6672 subtests failed.
Files=262, Tests=6672, 1635 wallclock secs (560.06 cusr + 307.48 csys = 867.54 
CPU)
Failed 13/262 test programs. 97/6672 subtests failed.
make: *** [test] Error 1

Summary of my perl5 (revision 5 version 8 subversion 8) configuration:
  Platform:
osname=darwin, osvers=8.7.0, archname=darwin-2level
uname='darwin macintosh.local 8.7.0 darwin kernel version 8.7.0: fri may 26 
15:20:53 pdt 2006; root:xnu-792.6.76.obj~1release_ppc power macintosh powerpc '
config_args='-de'
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef use5005threads=undef useithreads=undef 
usemultiplicity=undef
useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
use64bitint=undef use64bitall=undef uselongdouble=undef
usemymalloc=n, bincompat5005=undef
  Compiler:
cc='cc', ccflags ='-fno-common -DPERL_DARWIN -no-cpp-precomp 
-fno-strict-aliasing -pipe -I/usr/local/include',
optimize='-O3',
cppflags='-no-cpp-precomp -fno-common -DPERL_DARWIN -no-cpp-precomp 
-fno-strict-aliasing -pipe -I/usr/local/include'
ccversion='', gccversion='3.3 20030304 (Apple Computer, Inc. build 1495)', 
gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=8
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', 
lseeksize=8
alignbytes=8, prototype=define
  Linker and Libraries:
ld='env MACOSX_DEPLOYMENT_TARGET=10.3 cc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /usr/lib
libs=-ldbm -ldl -lm -lc
perllibs=-ldl -lm -lc
libc=/usr/lib/libc.dylib, so=dylib, useshrplib=false, libperl=libperl.a
gnulibc_version=''
  Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=bundle, d_dlsymun=undef, ccdlflags=' '
cccdlflags=' ', lddlflags=' -bundle -undefined dynamic_lookup 
-L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Compile-time options: PERL_MALLOC_WRAP USE_LARGE_FILES USE_PERLIO
  Built under darwin
  Compiled at Sep 13 2006 20:15:49
  @INC:
/usr/local/lib/perl5/5.8.8/darwin-2level
/usr/local/lib/perl5/5.8.8
/usr/local/lib/perl5/site_perl/5.8.8/darwin-2level
/usr/local/lib/perl5/site_perl/5.8.8
/usr/local/lib/perl5/site_perl/5.8.7/darwin-2level
/usr/local/lib/perl5/site_perl/5.8.7
/usr/local/lib/perl5/site_perl/5.8.4/darwin-2level
/usr/local/lib/perl5/site_perl/5.8.4
/usr/local/lib/perl5/site_perl
.




[perl #40815] Summary of 'make test' failures on Darwin

2006-11-12 Thread Steve Peters via RT
On Sat Nov 11 10:17:33 2006, [EMAIL PROTECTED] wrote:
 perl Configure.pl --without-gmp --cc=gcc --ccflags='-fno-common -pipe  
 -I/usr/local/include -pipe -fno-common'
 
 Then chromatic suggested manually editing the Makefile to delete '- 
 bundle' from the following line.
 LD_LOAD_FLAGS   = -bundle -undefined suppress
 
 make 21 | tee  ~/learn/perl/parrot.make.output.5.txt
 make test
 


The t/library/pcre.t is fixed by the patch in RT #40818.


Re: [perl #40834] [BUG] - PMC methods aren't inherited to PIR subclasses

2006-11-12 Thread Leopold Toetsch
Am Sonntag, 12. November 2006 16:54 schrieb Patrick R.Michaud:
 If a METHOD is defined in a *.pmc file, that METHOD is not
 automatically inherited by PIR-based subclasses.

This isn't quite true. But some METHODs / vtables / MMDs are implemented in a 
way that doesn't cope with inheritance.

See also:
#39329: Check to make sure PMC_str_val, etc. are used appropriately

or: 
src/pmc/integer.pmc:
...
PMC* add (PMC* value, PMC* dest) {
MMD_Integer: {
/*
 * SELF and value can both be PMCs that inherit
 * from Integer:
 *   cl = subclass Integer, MyInt
 * so we can't used PMC_int_val(SELF) in any of these
 * Integer methods

leo



[perl #40818] [PATCH] Silence warning in t/library/pcre.t

2006-11-12 Thread via RT
# New Ticket Created by  Steve Peters 
# Please include the string:  [perl #40818]
# in the subject line of all future correspondence about this issue. 
# URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40818 


When running test t/library/pcre.t, it spits out the following warning...

  Argument [SIGNAL -1] isn't numeric in numeric eq (==) at t/library/pcre.t 
line 30.

The attached patch silences the warning.  This also seems to stop the
test from failing on my setup.

Steve Peters
[EMAIL PROTECTED]
--- t/library/pcre.t.oldSat Nov 11 14:55:07 2006
+++ t/library/pcre.tSat Nov 11 14:55:27 2006
@@ -27,7 +27,7 @@
 
 # if we keep pcre, we need a config test
 my $cmd = ($^O =~ /MSWin32/) ? pcregrep --version : pcre-config --version;
-my $has_pcre = 0 == Parrot::Test::run_command(
+my $has_pcre = 0 eq Parrot::Test::run_command(
 $cmd, STDERR = File::Spec-devnull,
 );
 


Re: [perl #40814] [PATCH] Assorted Solaris fixes

2006-11-12 Thread chromatic
On Saturday 11 November 2006 10:02, Steve Peters wrote:

 The attached patches get Parrot to compile on Solaris, and fixes one
 test failure.

Thanks, applied as 15445.

-- c


Re: [perl #40279] [CAGE] C coding standards coda.

2006-11-12 Thread Will Coleda

Sure.

On Nov 12, 2006, at 7:56 AM, Paul Cochrane via RT wrote:


On Tue Sep 05 13:13:05 2006, coke wrote:

 From the recently updated pdd07:

C source files, and files largely consisting of C (e.g. yacc, lex,
PMC, and opcode source files), must end with this block:

/*
  * Local variables:
  *   c-file-style: parrot
  * End:
  * vim: expandtab shiftwidth=4:
  */



Will,

The tests are passing on the c_code_coda test, so is it ok if I close
this ticket now?

Thanks,

Paul





--
Will Coke Coleda
[EMAIL PROTECTED]




Assertion failed: (PTR2UINTVAL(mmd_table[i].func_ptr) 3) == 0

2006-11-12 Thread Ron Blaschke
This is about revision 15444.  Parrot seems to smoke not bad on my
Windows XP / Visual C++ 8 box.

6734 test cases:
6687 ok,
47 failed,
268 todo,
585 skipped
and 0 unexpectedly succeeded


I thought I'd remove C-DNDEBUG from the compiler flags for smoking
Parrot, but this causes troubles.

  ...
  Invoking Parrot to generate runtime\parrot\include\config.fpmc --cross
your fingers
  .\miniparrot.exe config_lib.pasm  runtime\parrot\include\config.fpmc
  Assertion failed: (PTR2UINTVAL(mmd_table[i].func_ptr)  3) == 0, file
src\mmd.c, line 1900
...

Anyone else seeing this?

Ron


Re: [perl #40823] Win32 vs. the world - length for sprintf('%e') - what's right?

2006-11-12 Thread Nicholas Clark
On Sat, Nov 11, 2006 at 04:34:55PM -0800, Chip Salzenberg wrote:

 Please somebody figure out what Perl does on Win32 for testing sprintf,
 because the Perl sprintf test suite seems to think that the right value
 for sprintf('%e',1) is 1e+00, but Win32 seems to return 1e+000 (note
 the extra digit in the exponent).  Is this true?  If so, is it a bug?  In

(As an aside, well, yes it's a bug in as much as Win32's C library is not
ANSI conformant. (I read about this somewhere, possibly p5p). Someone said
that Microsoft missed a trick in that their folks on the C standardisation
committee could have re-drafted the standard to allow 3 or 2 digit exponents,
instead of just 2, and made this non-buggy)

 any case, how does the Perl test suite not fail on Win32?

As to a useful answer, er, I don't know. Sorry.


Nicholas Clark


Re: Coding Standard Questions

2006-11-12 Thread Chip Salzenberg
On Tue, Oct 17, 2006 at 04:01:36PM -0500, Andy Lester wrote:
 if ( foo ) {
 bar();
 }
 else {
 bat();
 }

Well, that's not correct either: Our coding standards already say to omit
needless braces, and don't space inside the parens of if/while/etc.  Thus,
this is the preferred format:

if (foo)
bar();
else
baz();

-- 
Chip Salzenberg [EMAIL PROTECTED]


Re: Coding Standard Questions

2006-11-12 Thread Chip Salzenberg
On Tue, Oct 17, 2006 at 11:41:06PM +0200, Leopold Toetsch wrote:
 Anything that has the smallest smell of ever needing an extra statement after 
 if or else shall use braces in the first place (IMHO).

Predicting the future is something humans are bad at, sadly.
-- 
Chip Salzenberg [EMAIL PROTECTED]