[perl #41195] [BUG]: Change to Configure.pl causing 'make' to fail on Darwin

2007-01-11 Thread Steve Peters via RT
On Sun Jan 07 08:27:28 2007, [EMAIL PROTECTED] wrote:
 
 On Jan 7, 2007, at 8:44 AM, Steve Peters via RT wrote:
 
  What is your c++ symlink pointing at?
 
 
 
 
 [parrot] 512 $ ls -l /usr/bin/c++
 lrwxr-xr-x   1 root  wheel  7 Aug  9  2004 /usr/bin/c++ - g++-3.3
 [parrot] 513 $ ls -l /usr/bin/g++-3.3
 -r-xr-xr-x   1 root  wheel  135816 May 14  2006 /usr/bin/g++-3.3
 

OK, this problem must be something similar to the linking problems I
have with suncc on Linux.  Even though I specify everything on the
Configure.pl command-line in terms of --cc and --link, it magically
switches to g++ when trying to link.  Obviously, then, the hints or
something that runs after is misbehaving and redefining variables
configuration variables.



[perl #41235] [PATCH] Add get_name() Method to Namespaces

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


i'm sending this to rt so it doesn't get lost. i want it in before
0.4.8 next week.
~jerry

-- Forwarded message --
From: chromatic [EMAIL PROTECTED]
Date: Dec 25, 2006 1:44 PM
Subject: [PATCH] Add get_name() Method to Namespaces
To: [EMAIL PROTECTED]


Here's a patch to implement get_name(), as specified in PDD 21.  I haven't
checked it in because it includes an API change.  There was already a name()
method in namespaces; I renamed it per the PDD.

-- c
=== src/interpreter.c
==
--- src/interpreter.c	(revision 852)
+++ src/interpreter.c	(local)
@@ -673,7 +673,7 @@
 
 Run parrot operations of loaded code segment until an end opcode is
 reached run core is selected depending on the CInterp_flags when a
-Crestart opcode is encountered a different core my be selected and
+Crestart opcode is encountered, a different core may be selected and
 evaluation of opcode continues.
 
 =cut
=== src/ops/experimental.ops
==
--- src/ops/experimental.ops	(revision 852)
+++ src/ops/experimental.ops	(local)
@@ -2,7 +2,7 @@
 ** experimental.ops
 */
 
-extern PMC* Parrot_NameSpace_name(Interp* interp, PMC* pmc);
+extern PMC* Parrot_NameSpace_get_name(Interp* interp, PMC* pmc);
 
 VERSION = PARROT_VERSION;
 
@@ -255,7 +255,7 @@
 =cut
 
 op classname(out PMC, invar PMC) :object_base {
-PMC *ns = Parrot_NameSpace_name(interp,
+PMC *ns = Parrot_NameSpace_get_name(interp,
 VTABLE_namespace(interp, $2));
 if (PMC_IS_NULL(ns) || VTABLE_elements(interp, ns)  2)
 {
=== src/pmc/namespace.pmc
==
--- src/pmc/namespace.pmc	(revision 852)
+++ src/pmc/namespace.pmc	(local)
@@ -305,18 +305,18 @@
 
 /*
 
-=item CMETHOD PMC* name()
+=item CMETHOD PMC* get_name()
 
 Returns the name of the namespace as an array of strings.
 
-  $P2 = $P3.'name'()
+  $P2 = $P3.'get_name'()
   $S0 = join '::', $P2# '::Foo::Bar'
 
 =cut
 
 */
 
-METHOD PMC* name() {
+METHOD PMC* get_name() {
 PMC *ar, *ns;
 
 ar = pmc_new(INTERP, enum_class_ResizableStringArray);
@@ -376,7 +376,7 @@
 if (VTABLE_isa(INTERP, sub, s_sub))
 return sub;
 
-return PMCNULL;
+return PMCNULL;
 }
 
 /*
=== src/sub.c
==
--- src/sub.c	(revision 852)
+++ src/sub.c	(local)
@@ -273,7 +273,7 @@
 /* XXX use method lookup - create interface
  * see also pbc.c
  */
-extern PMC* Parrot_NameSpace_name(Interp *interp, PMC* pmc);
+extern PMC* Parrot_NameSpace_get_name(Interp *interp, PMC* pmc);
 
 STRING*
 Parrot_full_sub_name(Interp *interp, PMC* sub)
@@ -293,7 +293,7 @@
 STRING *j;
 
 Parrot_block_DOD(interp);
-ns_array = Parrot_NameSpace_name(interp, s-namespace_stash);
+ns_array = Parrot_NameSpace_get_name(interp, s-namespace_stash);
 if (s-name) {
 VTABLE_push_string(interp, ns_array, s-name);
 }
=== t/pmc/namespace.t
==
--- t/pmc/namespace.t	(revision 852)
+++ t/pmc/namespace.t	(local)
@@ -6,7 +6,7 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests = 39;
+use Parrot::Test tests = 40;
 use Parrot::Config;
 
 =head1 NAME
@@ -266,7 +266,7 @@
 .namespace ['lib']
 .sub main :main :anon
 $P0 = get_namespace
-$P0 = $P0.'name'()
+$P0 = $P0.'get_name'()
 $S0 = join ::, $P0
 say $S0
 end
@@ -313,7 +313,7 @@
 .include pmctypes.pasm
 $P0 = interpinfo .INTERPINFO_CURRENT_SUB
 $P1 = $P0.get_namespace()
-$P2 = $P1.'name'()
+$P2 = $P1.'get_name'()
 $S0 = join '::', $P2
 print $S0
 print \n
@@ -403,7 +403,7 @@
 $P1 = $P0[parrot]
 $P3 = new .NameSpace
 $P1[Foo] = $P3
-$P2 = $P3.'name'()
+$P2 = $P3.'get_name'()
 $I2 = elements $P2
 print $I2
 print \n
@@ -426,7 +426,7 @@
 $P4 = 1
 $P4[0] = 'Foo'
 $P0 = get_hll_namespace $P4
-$P2 = $P0.'name'()
+$P2 = $P0.'get_name'()
 $I2 = elements $P2
 print $I2
 print \n
@@ -435,7 +435,7 @@
 print \n
 # fetch w key
 $P2 = get_hll_namespace [Foo]
-$P2 = $P2.'name'()
+$P2 = $P2.'get_name'()
 $I2 = elements $P2
 print $I2
 print \n
@@ -455,7 +455,7 @@
 $P0 = find_global Foo, bar
 print ok\n
 $P1 = $P0.get_namespace()
-$P2 = $P1.name()
+$P2 = $P1.'get_name'()
 $S0 = join '::', $P2
 print $S0
 print \n
@@ -909,6 +909,96 @@
 Didn't find root namespace 'Foo'.
 OUTPUT
 
+pir_output_is( 'CODE', 'OUTPUT', 

[perl #41237] [TODO] PMC Class name IDs will require a dot in front

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


from DEPRECATED.pod:

  =head1 FUTURE changes

  Not yet deprecated, but it's recommended to use the new syntax and
  gradually change the old.

  =over 4

  =item PMC Class name IDs

  ... will require a dot in front

$P0 = new Integer   = $P0 = new .Integer

this is a placeholder ticket for this proposed syntax, which is open
for discussion. currently, imcc accepts either syntax for pmc class
names.

i don't care which syntax imcc accepts, but i think it should only
accept one, and not both.
~jerry


[perl #41238] [TODO] Perl PMCs

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


from DEPRECATED.pod:

  =item Perl PMCs

  The dynamic PMCS PerlString, PerlUndef, etc. were originally created with an
  eye towards being used in Perl6 development, and as the first set of full
  featured PMCs. However, Perl6 development is not going to be using them, and
  the core PMCs (String, Undef, Integer ...) have replaced them for usage.

  These PMCs will be moved to languages/perl5 after the next release. At some
  point after that they may be removed the repository altogether.

this is a placeholder ticket for this work, and will be updated in
DEPRECATED.pod as soon as the ticket number is generated.

~jerry


[perl #41239] [TODO] undertested pmcs

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


many, if not all, core pmcs are undertested. here's a brief survey of
obvious examples:

D:\usr\local\parrot\bugack -l --perl tests = 1; t\pmc
t\pmc\addrregistry.t
t\pmc\bound_nci.t
t\pmc\compiler.t
t\pmc\csub.t
t\pmc\default.t
t\pmc\deleg_pmc.t
t\pmc\enumerate.t
t\pmc\exception_handler.t
t\pmc\lexinfo.t
t\pmc\lexpad.t
t\pmc\multisub.t
t\pmc\null.t
t\pmc\parrotclass.t
t\pmc\parrotio.t
t\pmc\parrotlibrary.t
t\pmc\parrotthread.t
t\pmc\pointer.t
t\pmc\random.t
t\pmc\retcontinuation.t
t\pmc\scalar.t
t\pmc\sharedref.t
t\pmc\super.t
t\pmc\sys.t
t\pmc\tqueue.t
t\pmc\unmanagedstruct.t
t\pmc\version.t
t\pmc\vtablecache.t


surely we can do better. if you're going to attack one or more of
these items, feel free to open a ticket for a subset, and related it
as a child of this one.

~jerry


[perl #41240] Parrot 0.4.8 Release

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


Placeholder ticket for any issues that need to be addressed for the 0.4.8 
release.


[perl #41241] [BUG] Tcl doesn't compile/run on win32.

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


Need details.


[perl #41242] Compile on Linux with Intel C++ adn Sun Studio for Linux

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





[perl #41243] Link on Win32 with Borland C++

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


Need details.


[perl #41243] Link on Win32 with Borland C++

2007-01-11 Thread Steve Peters via RT
On Thu Jan 11 08:57:22 2007, coke wrote:
 Need details.

A recent patch has gotten Parrot to the point that it can be compiled
with Borland C++ on Win32.  Unfortunately, it does not link correctly to
actually create a valid parrot executable.  Additional configuration is
needed to make Borland compile and link Parrot so that it can actually
be run and tested.


Re: [perl #41235] [PATCH] Add get_name() Method to Namespaces

2007-01-11 Thread chromatic
On Thursday 11 January 2007 07:37, Jerry Gay wrote:

 i'm sending this to rt so it doesn't get lost. i want it in before
 0.4.8 next week.

I've held off on applying it because Allison said we need a deprecation cycle 
for the name() - get_name() rename.

-- c


[perl #41244] [TODO] update copyright data to 2007

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


happy new year! time to update the copyright info in the repo. boy, i
wish those svn folks would get their act together and allow custom
keywords, so we wouldn't have to do this every year. until then,
s/2006/2007/.

~jerry


Re: [perl #41195] [BUG]: Change to Configure.pl causing 'make' to fail on Darwin

2007-01-11 Thread James Keenan


On Jan 11, 2007, at 9:21 AM, Steve Peters via RT wrote:


On Sun Jan 07 08:27:28 2007, [EMAIL PROTECTED] wrote:


On Jan 7, 2007, at 8:44 AM, Steve Peters via RT wrote:


What is your c++ symlink pointing at?





[parrot] 512 $ ls -l /usr/bin/c++
lrwxr-xr-x   1 root  wheel  7 Aug  9  2004 /usr/bin/c++ - g++-3.3
[parrot] 513 $ ls -l /usr/bin/g++-3.3
-r-xr-xr-x   1 root  wheel  135816 May 14  2006 /usr/bin/g++-3.3



OK, this problem must be something similar to the linking problems I
have with suncc on Linux.  Even though I specify everything on the
Configure.pl command-line in terms of --cc and --link, it magically
switches to g++ when trying to link.  Obviously, then, the hints or
something that runs after is misbehaving and redefining variables
configuration variables.




As noted previously, once I reverted to the previous order of running  
the steps, I had no problem.  I've successfully run 'make' quite a  
few times since then.


Re: Numeric Semantics

2007-01-11 Thread TSa

HaloO,

Jonathan Lang wrote:

That said, I'm still trying to wrap my head around how the Euclidiean
definition would work for complex numbers.  What would be the quotient
and remainder for, e.g., 8i / 3; 8 / 3i; (3 + 4i) / 3; 8 / (4 + 3i);
or (12 + 5i) / (3 + 4i)?


I assume you are intending the Gaussian Integers Int[i], i.e. complex
numbers with Int coefficients. There you have to solve the equations

a = q * b + r

with q and r from Int[i] and N(r)  N(b) where N(x + yi) = x**2 + y**2.
This yields for your numbers e.g.

  a = 8i, b = 3  =  q = 2i, r = 2i

But what comes as a surprise to me is that these q and r are not unique!
q = 3i and r = -i works as well. So there is an additional constraint on
r that enforces a unique pair. E.g. x = 0 and y = 0 for r = x + yi.
Here are my results for the rest of your examples:

 a = 8,   b = 3i  =  q = -2i,r = 2
  q = -3i,r = -1

 a = 3 + 4i,  b = 3   =  q = 1 + i,  r = i

 a = 8,   b = 4 + 3i  =  q = 1 - i,  r = 1 + i

 a = 12 + 5i, b = 3 + 4i  =  q = 2 - i,  r = 2
  q = 3 - i,  r = -4i
  q = 2 - 2i, r = -2 + 3i

I cannot give an algorithm how to calculate the remainder.
Even less do I know how to generalize it to full Complex.

Regards, TSa.
--


Weekly Perl 6 mailing list summary for 31 December, 2006 - 6 January, 2007

2007-01-11 Thread Ann Barcomb

 This week on the Perl 6 mailing lists

Remember, the next Parrot bug day is 13 January, 2007. Join the rest
of the team at #parrot (irc.perl.org) to work on closing as many bugs
as possible before the next Parrot release.


 Language

  Numeric Semantics http://xrl.us/t3o7

Earlier, Luke Palmer asked for a clear definition of when math should
use floating points and when it should be integer-based. In response,
Darren Duncan highlighted a recent #perl6 discussion
http://xrl.us/t3o8 on the topic. He proposed distinct operators to
allow users to explicitly choose the math mode. Jonathan Lang
mentioned that in the one other instance where there were
type-specific versions of a common operator, a third 'generic' version
was required. Dr. Ruud suggested giving numerics multiple faces.

More recently, Larry Wall responded to the thread, adding his thoughts
and musing on whether standard Perl should include convenience
operators like `idiv` or if there should simply be pragmatic support
for them. A great deal of discussion followed.

 Parrot Porters

  [perl #41157] [PATCH] Fix a typo in t/op/cmp-nonbranch.t
  http://xrl.us/t77i

In ticket [perl #41157] http://xrl.us/t77j, Lee Duhem supplied a
patch to correct a typographical error.

  [perl #41158] [BUG] Here Docs in test Ccmp cause t/op/cmp-nonbranch.t
  abnormal exit http://xrl.us/t77k

Lee Duhem reported an error in a test; this was done in ticket [perl
#41158] http://xrl.us/t77m. Jerry Gay reported that he believed the
issue was resolved in r16381 and asked Lee to check it. Lee reported
that he thought it was a bug, resolved in ticket [perl #41165]
http://xrl.us/t77n.

  Punie ported to PAST-pm http://xrl.us/t77p

Allison Randal announced that she had modified Punie to work with
PAST-pm. She also gave her thoughts on working with PAST-pm, which
Patrick R. Michaud replied to.

  [perl #41163] [PATCH] suppress uninitialized value warning in
  config/inter/yacc.pm http://xrl.us/t77q

In ticket [perl #41163] http://xrl.us/t77r, Lee Duhem submitted a
patch to suppress some uninitialized value warnings. Jonathan
Worthington had a question about the patch, and Lee agreed with the
suggestion.

  [perl #41164] [BUG] 'make world' fails with msvc due to unresolved
  external http://xrl.us/t77s

Jerry Gay created ticket [perl #41164] http://xrl.us/t77t to report
a bug, which was resolved in r16383.

  [perl #41165] [PATCH] appropriate handle CRLE in Here Docs
  http://xrl.us/t77u

Ticket [perl #41165] http://xrl.us/t77n included a patch from Lee
Duhem to correct a problem he reported earlier in '[perl #41158] [BUG]
Here Docs in test Ccmp cause t/op/cmp-nonbranch.t abnormal exit
http://xrl.us/t77k'.

  [svn:parrot-pdd] r16391 - trunk/docs/pdds/clip http://xrl.us/t77v

With this commit, Allison Randal moved the I/O PDD out of the clip
directory, making it more official. Discussion continued on 'I/O PDD -
ready for implementation http://xrl.us/t77w'.

  I/O PDD - ready for implementation http://xrl.us/t77w

After moving the I/O PDD out of the clip directory (see
'[svn:parrot-pdd] r16391 - trunk/docs/pdds/clip
http://xrl.us/t77v'), Allison Randal announced that implementation
can begin on the details in the document. She also welcomed comments.

Jonathan Worthington replied that he liked what he had read, but felt
that more information was needed on how role composition should work.
Allison replied that she was still at work on defining roles in the
objects PDD. She offered a short explanation of how it would probably
work.

Some discussion on how to implement error values also took place, with
Jonathan, Allison and Larry Wall contributing.

  [perl #41168] graceful no compiler error message? http://xrl.us/t77x

In ticket [perl #41168] http://xrl.us/t77y, Will Coleda added a
request for a 'no compiler found' error message in `configure.pl`.

  [perl #41171] [PATCH] Fix to t/src/compiler.t so Parrot passes tests on
  Solaris http://xrl.us/t77z

Steve Peters submitted a patch as ticket [perl #41171]
http://xrl.us/t772.

  Re: [perl #41020] [PATCH] pmc2c.pl functionality extracted into separate
  package http://xrl.us/t3o9

Earlier James Keenan supplied some patches. After some discussion, the
patches were recently applied as r16345.

However, James felt there were still some problems with the patches.
He provided a new patch in the hopes that it would solve the problem.

  [NEW]: README for t/tools/pmc2cutils/ http://xrl.us/t773

James Keenan submitted a README file for `t/tools/pmc2utils`, which
was applied as r16409.

  [perl #41173] [PATCH] Intel C++ is not really gcc http://xrl.us/t774

Steve Peters created ticket [perl #41173] http://xrl.us/t775 to
report a problem caused by the Intel C++ compiler defining `__GNUC__`