Re: XML module question?

The XML::Writer module side-steps any ordering issues by directly serializing data structures to xml: $ raku -M XML::Writer -e'say XML::Writer.serialize: :wpt[ :lat<42>, :long<69>, "blah" ]' blah On Sat, Jul 17, 2021 at 4:48 AM Bruce Gray wrote: > > On Jul

Re: ^methods doesn't show all methods

I'm getting this on Rakudo blead. $ raku -v Welcome to Rakudo(tm) v2020.12-129-g291cc5f39. Implementing the Raku(tm) programming language v6.d. Built on MoarVM version 2020.12-100-gc93531608. $ raku -e'my $s = set 2, 4, 6; say $s.^methods>>.name.sort;' (ACCEPTS ASSIGN-KEY AT-KEY BUILDALL Bag

Re: Is LibraryMake still current?

Hi Fernando, I'm still in the habit of using LibraryMake. E.g. for https://github.com/p6-xml/LibXML-raku released in this last few months. Regards, David On Sun, Dec 22, 2019 at 7:47 AM Fernando Santagata < nando.santag...@gmail.com> wrote: > Hello, > > What can I use to help building native

[perl #131666] NativeCall MoarVM panic

Can confirm this is still current behaviour with Rakudo 2019. I have came across exactly the same issue and found this ticket. I've noticed, If I change the example to catch exceptions. It then runs: sub start-element($, $elem, $attr) { say "open $elem".indent($depth * 4);

Re: Fastest way to convert from a Buf to a Str?

Are all characters in the range 0-255, ie latin-1 characters? You could then try: my $str = $buf.decode("latin-1"); There's one potential issue if your data could contain DOS end of lines ("\r\n"), which will get translated to a single logical "\n" in the decoded string. - David On Sun, Feb

[perl #131919] [RFC] Returning Failure from failed P6-level .parse

On Mon, 21 Aug 2017 07:38:56 -0700, alex.jakime...@gmail.com wrote: > It was removed completely for 2017.08 release. > > Rakudo commit: > https://github.com/rakudo/rakudo/commit/465d91abdfda038cb7feda35f7966be4ec39acf3 > Discussion: https://irclog.perlgeek.de/perl6-dev/2017-08-21#i_15048995 > On

[perl #128000] [NativeCall] Feature Request: Pointer Arithmetic

Thanks Salvador, Now in Rakudo core https://github.com/rakudo/rakudo/commit/3ca6554fdd8ff91da5423e85d4a2b7d309949531 On Tue, 03 Oct 2017 10:41:41 -0700, david.warring wrote: > On Tue, 26 Apr 2016 15:24:57 -0700, sortiz wrote: > > Hi David, > > > > Can you give a try to NativeHelpers::Pointer,

Re: [perl #132222] [BUG] 'HAS' Embedded C-Structs not working as documented

Thanks for that. As a worka-around Rakudo seems to do a better job, if I give it a helping hand viz a TWEAK method: use NativeCall; class Point is repr('CStruct') { has uint8 $.x; has uint8 $.y; } class MyStruct2 is repr('CStruct') { HAS Point $.point; # <-- embedded has int8

Re: [perl #132222] [BUG] 'HAS' Embedded C-Structs not working as documented

Thanks for that. As a worka-around Rakudo seems to do a better job, if I give it a helping hand viz a TWEAK method: use NativeCall; class Point is repr('CStruct') { has uint8 $.x; has uint8 $.y; } class MyStruct2 is repr('CStruct') { HAS Point $.point; # <-- embedded has int8

[perl #128000] [NativeCall] Feature Request: Pointer Arithmetic

On Tue, 26 Apr 2016 15:24:57 -0700, sortiz wrote: > Hi David, > > Can you give a try to NativeHelpers::Pointer, part of NativeHelpers::Blob? > > When well tested I plan push it to core. > > Regards. > > Salvador Ortiz. Hi Salvador, That looks. OK. Can it go straight into core?

[perl #132073] [BUG] isa method errors when called on a subset type object

ne remaining todo test for the subset of a subset case, ie: > > subset S of Int; subset S2 of S; say S2.isa(S) > > On Sun, Sep 17, 2017 at 6:34 AM, David Warring > <david.warr...@gmail.com> > wrote: > > > After that commit: subset S of Int; S.isa(True) retur

Re: [perl #132073] [BUG] isa method errors when called on a subset type object

Tests added with roast commit https://github.com/perl6/roast/commit/d776a06e52c35d6cbb7b7bbade7b7a15b97ecff8 One remaining todo test for the subset of a subset case, ie: subset S of Int; subset S2 of S; say S2.isa(S) On Sun, Sep 17, 2017 at 6:34 AM, David Warring <david.warr...@gmail.com>

Re: [perl #132073] [BUG] isa method errors when called on a subset type object

Tests added with roast commit https://github.com/perl6/roast/commit/d776a06e52c35d6cbb7b7bbade7b7a15b97ecff8 One remaining todo test for the subset of a subset case, ie: subset S of Int; subset S2 of S; say S2.isa(S) On Sun, Sep 17, 2017 at 6:34 AM, David Warring <david.warr...@gmail.com>

Re: [perl #132073] [BUG] isa method errors when called on a subset type object

After that commit: subset S of Int; S.isa(True) returns true as expected. I've noticed a quibble with subset of a subset: perl6 -e'subset S of Int; subset S2 of S; say S2.isa(S)' False Should be True. On Sun, Sep 17, 2017 at 3:17 AM, Aleks-Daniel Jakimenko-Aleksejev via RT <

Re: [perl #132073] [BUG] isa method errors when called on a subset type object

After that commit: subset S of Int; S.isa(True) returns true as expected. I've noticed a quibble with subset of a subset: perl6 -e'subset S of Int; subset S2 of S; say S2.isa(S)' False Should be True. On Sun, Sep 17, 2017 at 3:17 AM, Aleks-Daniel Jakimenko-Aleksejev via RT <

Re: [perl #131965] Shaped arrays can't have zero size

Attached is my use case which is parsing of PDF cross reference indices. There are normally three numeric entries per line. e.g. xref 0 8 00 65535 f 09 0 n 74 0 n 000120 0 n Which populates nicely into an array of 'n' lines of shape 3. There's the rare,

Re: [perl #131965] Shaped arrays can't have zero size

Attached is my use case which is parsing of PDF cross reference indices. There are normally three numeric entries per line. e.g. xref 0 8 00 65535 f 09 0 n 74 0 n 000120 0 n Which populates nicely into an array of 'n' lines of shape 3. There's the rare,

Re: Are 64 bit natives universally available?

ble since Christmas, afaik. > > > On 27 Aug 2017, at 22:42, David Warring <david.warr...@gmail.com> wrote: > > > > Quick question. > > > > I just want to doublle check that int64, uint64 are universally > available via Perl 6, before introducing them

Are 64 bit natives universally available?

Quick question. I just want to doublle check that int64, uint64 are universally available via Perl 6, before introducing them into modules. e.g. % perl6 -e'my uint64 $n = 99; say $n' 99 - David

Re: Bi-directional communication with another process

Thanks Timo, A Proc::Async example, after reading the doco. Agree, that't better, even for the simple case :-) - David my $proc = Proc::Async.new('sh', '-c', 'for x in `seq 1 1` ; do echo "o$x"; echo "e$x" 1>&2; done'); # subscribe to new output from out and err handles: $proc.stdout.tap(->

Re: Bi-directional communication with another process

Perl 5 and C have the select call that lets you determine which of a group of file-descriptor are ready for reading and writing. I thought it might be useful here. https://en.wikipedia.org/wiki/Select_(Unix) I've found a module by Tadzik, https://github.com/tadzik/IO-Select, but it's looking

Re: ding!

Does printing an ASCII BEL character do what you want? perl6 -e'print "\x7"' On Thu, Jun 1, 2017 at 3:23 PM, ToddAndMargo wrote: > Hi All, > > Does Perl 6 have a build in "ding" sound, or do I > need to make a system call (which I do all > the time in bash script)? > >

[perl #131174] [NYI] Atrribute Introspect shape

I've added a fudged test to S12-introspection/attributes.t that the container shape is as declared; not a Whatever. On Wed, 19 Apr 2017 03:14:35 -0700, c...@zoffix.com wrote: > On Tue, 18 Apr 2017 20:34:15 -0700, david.warring wrote: > > AFAIK there's currently no way of introspecting the shape

Re: [perl #131112] [BUG] Regression Missing serialize REPR function for REPR VMHash (Rakudo::Internals::IterationSet)

sing serialize REPR function for REPR VMHash (Rakudo::Internals::IterationSet) On Fri, Apr 7, 2017 at 10:04 AM, David Warring <perl6-bugs-follo...@perl.org > wrote: > # New Ticket Created by David Warring > # Please include the string: [perl #131112] > # in the subject line

Re: [perl #129907] [BUG] interaction of class FALLBACK methods and safe method calls (.?)

On Tue, Oct 18, 2016 at 1:35 PM, David Warring <perl6-bugs-follo...@perl.org > wrote: > # New Ticket Created by David Warring > # Please include the string: [perl #129907] > # in the subject line of all future correspondence about this issue. > # https://rt.perl.org/Ticket/D

[perl #121940] [@LARRY] say True but False # should be 'True' (advent2010-day19)

The behavious still seems the same: % perl6 --v This is Rakudo version 2016.07.1-135-g77724b2 built on MoarVM version 2016.07-16-g85b6537 implementing Perl 6.c. % perl6 -e'my $s = False but True; say $s; say $s.so;' True True This is inconsistent with: % perl6 -e'my $s = 0 but True; say $s;

Re: Union

home at the end > of the week although I only have little endian Intell chips. I will have to > look around for others. Btw, are there still chips storing big endian > paired in two bytes? So your example number would become 0x23, 0x01, 0x67, > 0x45 ? > > Thanks again, > Marcel &g

Re: Union

Hi Marcel, With regard to checking for endianess. I don't think there's anything built in NativeCall that directly determines this, but hopefuly the following should do it, without resorting to a C compiler. use NativeCall; sub little-endian returns Bool { my $i = CArray[uint32].new:

Custom accessor compose via traits

The example below is combines traits (S14) Lvalue subs (S06) to create a base class SimpleTiedHash that ties Attributes to the hash using the 'Entry' accessor. PDFCatalog is an example instance class. This mostly works well. But SimpleTiedHash currently has a hacky way of overriding the

Re: Custom accessor compose via traits

, which are a bit more evolved than the above. hash methods are also overrride: AT-KEY ( $foobar) , and ASSIGN-KEY ($foobar = 42) It's an experiment, which is so far, progressing pretty well, the above is just a nit. - David On Fri, Jul 31, 2015 at 9:47 AM, David Warring david.warr...@gmail.com wrote

Re: match an empty string?

Hi Marc, This looks like a Perl 5 complementary character match: [^:]* But it means something quite different in Perl6. From S05 http://perlcabal.org/syn/S05.html Bracket rationalization http://perlcabal.org/syn/S05.html#Bracket_rationalization [ ... ] is no longer a character class. It now

Re: Gather, take, newbie questions

Hi Jacinta, I get a bit further with my build of Perl 6, which at least runs: % perl6 fib.pl 0 Are you maybe using an old Perl6? Try: % perl6 -e'say $*PERL' (name = rakudo, compiler = {name = rakudo, ver = 2013.11-22-g262e600, release-number = , build-date = 2013-12-05T22:52:45Z, codename =

Re: [perl #118965] AutoReply: [BUG] Import of overlapping export groups

Another failing example: use v6; class Test { sub foo is export(:foo) {42}; sub bar is export(:bar) {0x42}; sub baz is export(:foo, :bar) {0o42}; } % perl6 -e 'use Test :foo, :bar' ===SORRY!=== Cannot import symbol baz from Test, because it already

Re: [perl #118965] AutoReply: [BUG] Import of overlapping export groups

Same without tabs, sorry: use v6; class Alignment { constant left is export(:horizontal) = 0.0; constant right is export(:horizontal) = 1.0; constant bottom is export(:vertical) = 0.0; constant topis export(:vertical) = 1.0; constant

Re: [perl #117831] [BUG] Grammar capture of '%' separator

Thanks for that. I've added a couple of tests to roast/S05-capture/caps.t. https://github.com/perl6/roast/commit/bc4c9a5ec803a2a19087a922798df6f8f8e653c9 Hope these help. On Sat, May 4, 2013 at 7:45 AM, Patrick R. Michaud via RT perl6-bugs-follo...@perl.org wrote: Now fixed in 4741028:

Re: [perl #117831] [BUG] Grammar capture of '%' separator

It's inconsistent with the %% separator. This also also lets me catch variable operators. e.g. grammar G { token TOP {letter +%% sep} token letter{[a..z]} token sep{\,|\;} } say G.parse(a;b,c,d); ｢a;b,c,d｣ letter = ｢a｣ sep = ｢;｣ letter = ｢b｣ sep = ｢,｣ letter = ｢c｣

Re: Perl 6 / Rakudo unicode code point ranges

, Feb 18, 2013 at 11:29 PM, David Warring david.warr...@gmail.comwrote: Hi Guys, A quick question. I'm trying to interpret unicode code-point ranges from the CSS 3 spec - http://www.w3.org/TR/css3-syntax/#CHARSETS The rule in question is nonascii :== #x80-#xD7FF #xE000-#xFFFD #x1

Perl 6 / Rakudo unicode code point ranges

, David Warring