On 2/6/24 09:03, Bruce Gray wrote:
On Feb 6, 2024, at 10:52, ToddAndMargo via perl6-users
wrote:
On 6 Feb 2024, at 00:39, ToddAndMargo via perl6-users
wrote:
Hi All,
Is there a way to syntax a module? Sort of like the "-c"
option on main programs?
Many thanks,
-T
On 2/
On 6 Feb 2024, at 17:52, ToddAndMargo via perl6-users
wrote:
On 6 Feb 2024, at 00:39, ToddAndMargo via perl6-users
wrote:
Hi All,
Is there a way to syntax a module? Sort of like the "-c"
option on main programs?
Many thanks,
-T
On 2/6/24 01:34, Elizabeth Mattijsen wrote:
> On Feb 6, 2024, at 10:52, ToddAndMargo via perl6-users
> wrote:
>
>>> On 6 Feb 2024, at 00:39, ToddAndMargo via perl6-users
>>> wrote:
>>>
>>> Hi All,
>>>
>>> Is there a way to syntax a module? Sort of like the "-c&qu
Do you have some "use lib 'foo'" setting in your program?
If so, use that on the command-line, e.g.:
$ raku -Ifoo -c bar.rakumod
> On 6 Feb 2024, at 17:52, ToddAndMargo via perl6-users
> wrote:
>
>>> On 6 Feb 2024, at 00:39, ToddAndMargo via pe
On 6 Feb 2024, at 00:39, ToddAndMargo via perl6-users
wrote:
Hi All,
Is there a way to syntax a module? Sort of like the "-c"
option on main programs?
Many thanks,
-T
On 2/6/24 01:34, Elizabeth Mattijsen wrote:
> $ raku -c foo.rakumod
> Syntax OK
>
$ raku -c WinMess
$ raku -c foo.rakumod
Syntax OK
> On 6 Feb 2024, at 00:39, ToddAndMargo via perl6-users
> wrote:
>
> Hi All,
>
> Is there a way to syntax a module? Sort of like the "-c"
> option on main programs?
>
> Many thanks,
> -T
>
>
>
> --
>
Hi All,
Is there a way to syntax a module? Sort of like the "-c"
option on main programs?
Many thanks,
-T
--
~~
Computers are like air conditioners.
They malfunction when you open windows
~~
,
# WTS_CURRENT_SERVER_HANDLE to use the RD Session Host server that
hosts your application.
[in] DWORD Reserved,
[in] DWORD Version,
[out] PWTS_SESSION_INFOA *ppSessionInfo,
[out] DWORD *pCount
);
to dig out a pointer (*ppSessionInfo) to a
C++ OOP
application.
[in] DWORD Reserved,
[in] DWORD Version,
[out] PWTS_SESSION_INFOA *ppSessionInfo,
[out] DWORD *pCount
);
to dig out a pointer (*ppSessionInfo) to a
C++ OOP data structure, which is repeated
pCount times. (No problem
On 12/20/20 9:27 PM, Brad Gilbert wrote:
It doesn't matter if it is a C pointer.
Unless you are working on Moarvm, you should consider them arbitrary
unique numbers. Like GUID.
That said, yes I'm sure that they represent a location in memory.
That explains it. Thank you!
I use
f = <" ~ self.Msg ~ ">\n";
>print "self = <" ~ self.Str ~ ">\n";
> }
> }
>
> my $x = PrintTest.new(Msg => "abc");
>
> $x.PrintMsg
> self =
> self = >
>
> i
It doesn't matter if it is a C pointer.
Unless you are working on Moarvm, you should consider them arbitrary unique
numbers. Like GUID.
That said, yes I'm sure that they represent a location in memory.
On Sun, Dec 20, 2020, 6:45 PM ToddAndMargo via perl6-users <
perl6-us...@pe
PrintTest.new(Msg => "abc");
$x.PrintMsg
self =
self = >
is "95224840" a C pointer? What is that thing?
Many thanks,
-T
Branch: refs/heads/master
Home: https://github.com/Raku/old-design-docs
Commit: 63e44c36351887f1eb76500d7102f0db44848d27
https://github.com/Raku/old-design-docs/commit/63e44c36351887f1eb76500d7102f0db44848d27
Author: niner
Date: 2020-10-01 (Thu, 01 Oct 2020)
Changed paths:
Hi All,
When Native call gives me back an address and byte count
to a C string, how do I turn that into a Raku string?
Address = 5636171 0x56004B
byte count = 14 (UTF16) two of these are presumed to be chr(0)
Actual string is `KVM-W7`
Many thanks,
-T
ocs.perl6.org/routine/slurp
>
> What is |c, as in
>
> multi sub slurp(IO::Handle:D $fh = $*ARGFILES, |c)
> multi sub slurp(IO() $path, |c)
>
> Many thanks,
> -T
>
Hi All,
Over on
https://docs.perl6.org/routine/slurp
What is |c, as in
multi sub slurp(IO::Handle:D $fh = $*ARGFILES, |c)
multi sub slurp(IO() $path, |c)
Many thanks,
-T
On 07/25/2018 12:23 PM, Brandon Allbery wrote:
here's been discussion about having -c run the optimize stage as well,
since some information needed for full checking doesn't exist in a
useful form until then.
I like the idea!
On Wed, Jul 25, 2018 at 11:48:30AM -0700, ToddAndMargo wrote:
> Maybe I am trying to get "-c" to do too many things.
>
> What I would like it to do is to check everything right up to but not
> actually run the program.
Part of the challenge here is that unlike many other
There's been discussion about having -c run the optimize stage as well,
since some information needed for full checking doesn't exist in a useful
form until then.
On Wed, Jul 25, 2018 at 2:49 PM ToddAndMargo wrote:
> Hi Simon,
>
> Maybe I am trying to get "-c" to d
Hi Simon,
Maybe I am trying to get "-c" to do too many things.
What I would like it to do is to check everything right up to but not
actually run the program.
-T
On 07/25/2018 02:27 AM, Simon Proctor wrote:
Problem is that's not a syntax error as such. Running with stage sta
Problem is that's not a syntax error as such. Running with stage stats you
can see where -c stop and where the error is thrown.
(I'm sure someone with deeper VM understanding can explain is better).
perl6 --stagestats -e 'sub foo($a, $b) { say "Hmm" };foo(1,2,"3
Dear Developers,
$ perl6 -v
This is Rakudo version 2018.05 built on MoarVM version 2018.05
implementing Perl 6.c.
`Perl6 -c xxx.pl6` passes
if IsCurrentRevNewer ( $OldRev, $NewRev, $SubName, "no", "quiet" )
when the sub it calls only has three variables in it header,
On 06/21/2018 08:42 AM, Larry Wall wrote:
On Wed, Jun 20, 2018 at 10:58:01PM -0700, Brent Laabs wrote:
: -c does compile time warnings, not runtime warnings. You can't make
: runtime warnings appear at compile time without using a BEGIN block.
That's perhaps a bit oversimplified, sin
On Wed, Jun 20, 2018 at 10:58:01PM -0700, Brent Laabs wrote:
: -c does compile time warnings, not runtime warnings. You can't make
: runtime warnings appear at compile time without using a BEGIN block.
That's perhaps a bit oversimplified, since in this case the warning is
coming
> > On Wed, Jun 20, 2018 at 9:59 PM, Todd Chester
> What is a BEGIN block?
BEGIN is one of the "phasers" that are used in Perl 6
https://docs.perl6.org/language/phasers#index-entry-Phasers__BEGIN-BEGIN
It marks a block of code for running as soon as possible, and if possible
during compile time
<mailto:toddandma...@zoho.com>> wrote:
> On Tue, Jun 19, 2018 at 10:50 PM, Todd Chester mailto:toddandma...@zoho.com>> wrote:
>> Dear Perl Developers,
>>
>> Would you please fix this `perl6 -c` checker error?
>>
>>
-c does compile time warnings, not runtime warnings. You can't make
runtime warnings appear at compile time without using a BEGIN block.
On Wed, Jun 20, 2018 at 9:59 PM, Todd Chester wrote:
>
>
> > On Tue, Jun 19, 2018 at 10:50 PM, Todd Chester
> wrote:
>
> On Tue, Jun 19, 2018 at 10:50 PM, Todd Chester
wrote:
>> Dear Perl Developers,
>>
>> Would you please fix this `perl6 -c` checker error?
>>
>> $ perl6 -v
>> This is Rakudo version 2018.05 built on MoarVM version 2018.05
>> implementing Perl 6.c
It's a warning, not an error.
On Tue, Jun 19, 2018 at 10:50 PM, Todd Chester wrote:
> Dear Perl Developers,
>
> Would you please fix this `perl6 -c` checker error?
>
> $ perl6 -v
> This is Rakudo version 2018.05 built on MoarVM version 2018.05
> implementing Perl 6.c.
On 06/19/2018 09:50 PM, Todd Chester wrote:
Dear Perl Developers,
Would you please fix this `perl6 -c` checker error?
$ perl6 -v
This is Rakudo version 2018.05 built on MoarVM version 2018.05
implementing Perl 6.c.
The checkers passes this line with Syntax OK
$ReturnStr, $CurlStatus
Dear Perl Developers,
Would you please fix this `perl6 -c` checker error?
$ perl6 -v
This is Rakudo version 2018.05 built on MoarVM version 2018.05
implementing Perl 6.c.
The checkers passes this line with Syntax OK
$ReturnStr, $CurlStatus = CurlDownloadFile $FileAddr,
$BaseFileName
On 06/13/2018 11:28 PM, Todd Chester wrote:
Hi All,
$ perl6 -v
This is Rakudo version 2018.04 built on MoarVM version 2018.04.1
implementing Perl 6.c.
I have another `perl6 -c` bug to fix
$ perl6 -c GetUpdates.pl6
===SORRY!===
Could not find Term::termios at line 15 in:
/home
Hi All,
$ perl6 -v
This is Rakudo version 2018.04 built on MoarVM version 2018.04.1
implementing Perl 6.c.
I have another `perl6 -c` bug to fix
$ perl6 -c GetUpdates.pl6
===SORRY!===
Could not find Term::termios at line 15 in:
/home/linuxutil
/home/todd/.perl6
/usr/lib64/perl6/site
On 05/10/2018 07:37 PM, ToddAndMargo wrote:
Hi All,
I am converting a YUGE program over from Perl 5 to
Perl 6 (Perl 5's subs drive me INSANE).
$ perl6 -c GetUpdates.pl6
===SORRY!=== Error while compiling /home/linuxutil/CurlUtils.pm6
Variable '$TimeOut' is not declared. Did you
Hi All,
I am converting a YUGE program over from Perl 5 to
Perl 6 (Perl 5's subs drive me INSANE).
$ perl6 -c GetUpdates.pl6
===SORRY!=== Error while compiling /home/linuxutil/CurlUtils.pm6
Variable '$TimeOut' is not declared. Did you mean '$Timeout'?
at /home/l
Yes, it would be awesome to have warnings for unused params and variables.
On 2018-01-14 12:16:08, c...@zoffix.com wrote:
> On Sat, 14 Oct 2017 20:53:03 -0700, alex.jakime...@gmail.com wrote:
> > FWIW I made a throwaway script that looks for unused params, and
> > there
> >
On Sat, 14 Oct 2017 20:53:03 -0700, alex.jakime...@gmail.com wrote:
> FWIW I made a throwaway script that looks for unused params, and there
> are many
> of these in rakudo sources. Of course, most of these cases are not in
> hot
> paths, but the overall performance benefit may be very noticeable.
On Sat, 14 Oct 2017 20:53:03 -0700, alex.jakime...@gmail.com wrote:
> FWIW I made a throwaway script that looks for unused params, and there
> are many
> of these in rakudo sources. Of course, most of these cases are not in
> hot
> paths, but the overall performance benefit may be very noticeable.
Still reproducible (2017.11, HEAD(5929887))
On 2014-05-10 14:42:47, david.warring wrote:
> Golfed from fudged test in integration/advent2010-day10.t
>
> $ perl6-m -e'my @o <== sort <== ("c", "b", "a")'
> Unable to parse expression in quo
> On 22 Nov 2017, at 19:31, Timo Paulssen via RT
> wrote:
> On Mon, 20 Nov 2017 12:13:47 -0800, ronaldxs wrote:
>> What about a native perl6 range loop? Couldn't there be some way for
>> Perl 6 / Rakudo to generate code competitive on a small range with the
>> "native-loop" example?
>>
>> perl6
> On 22 Nov 2017, at 19:31, Timo Paulssen via RT
> wrote:
> On Mon, 20 Nov 2017 12:13:47 -0800, ronaldxs wrote:
>> What about a native perl6 range loop? Couldn't there be some way for
>> Perl 6 / Rakudo to generate code competitive on a small range with the
>> "native-loop" example?
>>
>> perl6
On Mon, 20 Nov 2017 12:13:47 -0800, ronaldxs wrote:
> What about a native perl6 range loop? Couldn't there be some way for
> Perl 6 / Rakudo to generate code competitive on a small range with the
> "native-loop" example?
>
> perl6 -e '
> {
> my int ($a, $one, $three) = (42, 1, 3);
>
What about a native perl6 range loop? Couldn't there be some way for Perl 6 /
Rakudo to generate code competitive on a small range with the "native-loop"
example?
perl6 -e '
{
my int ($a, $one, $three) = (42, 1, 3);
for ^10_000_000 { $a += $one + $a%$three };
say now
For comparison to march on the same comp:
bash-3.2$ perl6 perf.p6
perl6-loop: 63.0037058
c-loop: 76.86853305 (0.82 times faster)
native-loop: 0.2170930 (354.08 times faster)
perl6 loops are faster. c style loops are slower. Native loops are even
faster relative to the others (for me).
We can
For comparison to march on the same comp:
bash-3.2$ perl6 perf.p6
perl6-loop: 63.0037058
c-loop: 76.86853305 (0.82 times faster)
native-loop: 0.2170930 (354.08 times faster)
perl6 loops are faster. c style loops are slower. Native loops are even
faster relative to the others (for me).
We can
On Sun, 12 Mar 2017 07:27:37 -0700, allber...@gmail.com wrote:
> On Sun, Mar 12, 2017 at 12:48 AM, Lloyd Fournier
> wrote:
>
> > perl6-loop: 84.8739988
> > c-loop: 67.65849241 (1.25 times faster)
> > native-loop: 0.4981954 (135.81 times faster)
> >
>
>
> > > things run faster.
> > >
> > > The difference is measurable and you can increase the number of
> > > loops
> > > to observe it even better.
> > >
> > >
> > > This ticket is motivated by a pull request which used that
> > > observation
> > > to speed things up in rakudo:
> > > https://github.com/rakudo/rakudo/pull/1196
> > >
> > >
> > > This is Rakudo version 2017.09-375-ga0f29e0df built on MoarVM
> > > version
> > > 2017.09.1-594-gb9d3f6da
> > > implementing Perl 6.c.
tter.
> >
> >
> > This ticket is motivated by a pull request which used that observation
> > to speed things up in rakudo:
> > https://github.com/rakudo/rakudo/pull/1196
> >
> >
> > This is Rakudo version 2017.09-375-ga0f29e0df built on MoarVM version
> > 2017.09.1-594-gb9d3f6da
> > implementing Perl 6.c.
ence is measurable and you can increase the number of loops
> to observe it even better.
>
>
> This ticket is motivated by a pull request which used that observation
> to speed things up in rakudo:
> https://github.com/rakudo/rakudo/pull/1196
>
>
> This is Rakudo version 2017.09-375-ga0f29e0df built on MoarVM version
> 2017.09.1-594-gb9d3f6da
> implementing Perl 6.c.
0df built on MoarVM version
2017.09.1-594-gb9d3f6da
implementing Perl 6.c.
On a slightly more positive note, that PR indeed resolves this ticket. I think
the new error message is clear enough.
On 2017-10-08 00:52:36, alex.jakime...@gmail.com wrote:
> There is a PR but it's really bad:
> https://github.com/rakudo/rakudo/pull/1188
>
> On 2016-04-07 17:05:15, alex.jakime...
There is a PR but it's really bad: https://github.com/rakudo/rakudo/pull/1188
On 2016-04-07 17:05:15, alex.jakime...@gmail.com wrote:
> Code:
> loop (my $x = 0, $x < 10, $x++) {}
>
> Result:
> ===SORRY!=== Error while compiling -e
> Malformed loop spec
> at -e:1
> --> loop (my $x = 0, $x < 10,
; >
> > Ie, the embedded struct is not automatically created and defined, when a
> > new containing struct is created.
> >
> > Rakudo version 2017.09-199-gc91c40115 built on MoarVM version
> > 2017.09.1-62-g89ca8eb0
> > implementing Perl 6.c.
>
>
> This is more an NYI than a bug... the code for that is more or less
> a first-pass draft. There are workarounds (see my xcb module), but they
> require surrendering your sanity to dark forces.
>
>
; >
> > Ie, the embedded struct is not automatically created and defined, when a
> > new containing struct is created.
> >
> > Rakudo version 2017.09-199-gc91c40115 built on MoarVM version
> > 2017.09.1-62-g89ca8eb0
> > implementing Perl 6.c.
>
>
> This is more an NYI than a bug... the code for that is more or less
> a first-pass draft. There are workarounds (see my xcb module), but they
> require surrendering your sanity to dark forces.
>
>
gt; in block at /tmp/tst.pl line 15
>
> Ie, the embedded struct is not automatically created and defined, when a
> new containing struct is created.
>
> Rakudo version 2017.09-199-gc91c40115 built on MoarVM version
> 2017.09.1-62-g89ca8eb0
> implementing Perl 6.c.
This i
ot look up attributes in a Point type object
in block at /tmp/tst.pl line 15
Ie, the embedded struct is not automatically created and defined, when a
new containing struct is created.
Rakudo version 2017.09-199-gc91c40115 built on MoarVM version
2017.09.1-62-g89ca8eb0
implementing Perl 6.c.
On Thu, 14 Sep 2017 13:30:46 -0700, timo wrote:
> I'm using two start blocks that return Slips to generate a long list in
> parallel, then i iterate over the result in the Moar Heap Analyzer.
>
> Trying to take advantage of v6.d's nonblocking await gives me a change
> in semantics, though:
>
>
On Thu, 14 Sep 2017 13:30:46 -0700, timo wrote:
> I'm using two start blocks that return Slips to generate a long list in
> parallel, then i iterate over the result in the Moar Heap Analyzer.
>
> Trying to take advantage of v6.d's nonblocking await gives me a change
> in semantics, though:
>
>
# New Ticket Created by Timo Paulssen
# Please include the string: [perl #132091]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=132091 >
I'm using two start blocks that return Slips to generate a long list in
parallel, then i
# New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev
# Please include the string: [perl #131950]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=131950 >
Submitting so that it does not slip through the cracks.
m: (
On Fri, 17 Feb 2017 12:41:12 -0800, david.warring wrote:
> On Thu, 16 Feb 2017 19:44:47 -0800, lloyd.fo...@gmail.com wrote:
> > note (Nil andthen "foo" orelse Nil orelse "bar");
> > -> ;; $_ is raw { #`(Block|140635964425160) ... }
> >
> > see the previously fixed:
> > https://rt.perl.org/Public/Bu
On Fri, 17 Feb 2017 12:41:12 -0800, david.warring wrote:
> On Thu, 16 Feb 2017 19:44:47 -0800, lloyd.fo...@gmail.com wrote:
> > note (Nil andthen "foo" orelse Nil orelse "bar");
> > -> ;; $_ is raw { #`(Block|140635964425160) ... }
> >
> > see the previously fixed:
> > https://rt.perl.org/Public/Bu
ly a much bigger
difference than a different choice over flattening!
In fact, it's pretty consistent throughout Perl 6 that you need to know about
the target of an assignment in order to know what it's going to do with the
source. Assignment into a List like `($a, $b) = @c` will happily dis
On Thu, 06 Apr 2017 13:46:00 -0700, alex.jakime...@gmail.com wrote:
> Code:
> my @a = ;
> my @b = <1 2 3>;
> my @c = @a, @b;
> say @c
>
> Result:
> [[a b c] [1 2 3]]
>
>
> So with arrays, nothing is flattened and you get an array with two
> elements.
rl.org> wrote:
> # New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev
> # Please include the string: [perl #13]
> # in the subject line of all future correspondence about this issue.
> # https://rt.perl.org/Ticket/Display.html?id=13 >
>
>
> Code:
> my @a = ;
# New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev
# Please include the string: [perl #13]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=13 >
Code:
my @a = ;
my @b = <1 2 3>;
my @c = @a, @b;
say @c
Re
On Sun, Mar 12, 2017 at 12:48 AM, Lloyd Fournier
wrote:
> perl6-loop: 84.8739988
> c-loop: 67.65849241 (1.25 times faster)
> native-loop: 0.4981954 (135.81 times faster)
>
Still quite a lot of optimization to be done on that front. WRT native int,
one of the issues is needing t
If you think that discrepancy is impressive you're going to love this. I
added a version to your example using native ints:
https://gist.github.com/LLFourn/8c3e895e789fab957355ce23c9420133
bash-3.2$ perl6 native-int-perf.p6
perl6-loop: 84.8739988
c-loop: 67.65849241 (1.25 times faster)
n
# New Ticket Created by Michael Schaap
# Please include the string: [perl #130982]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=130982 >
Perl6-style simple a-to-b loops are often much slower than the
corresponding C-st
der commit (fb4f16 is from
2017-01-03). On HEAD r-j returns 'Empty' as well:
$ ./perl6-j 'my $r := do 42 with Nil; say $r.perl;'
Empty
$ ./perl6-j --version
This is Rakudo version 2017.01-223-gffae3ff built on JVM
implementing Perl 6.c.
# New Ticket Created by Lloyd Fournier
# Please include the string: [perl #130798]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=130798 >
note (Nil andthen "foo" orelse Nil orelse "bar");
-> ;; $_ is raw { #`(Block|1406359644
On Sat, Jan 14, 2017 at 6:40 AM, Joachim Durchholz wrote:
> Am 14.01.2017 um 11:29 schrieb Samantha McVey:
>>
>> See here for the commit that added some Alias Names to JVM:
>> https://github.com/perl6/nqp/commit/0c249e7236a63325e6440df55a762a4378e6e63a
>>
>> Hopefully I have explained this well en
Am 14.01.2017 um 11:29 schrieb Samantha McVey:
See here for the commit that added some Alias Names to JVM:
https://github.com/perl6/nqp/commit/0c249e7236a63325e6440df55a762a4378e6e63a
Hopefully I have explained this well enough.
I kinda expected this to be implemented in NQP and hence be iden
On Saturday, 14 January 2017 02.06.57 PST you wrote:
> > BELL now resolves to 🔔 U+1F514 on MoarVM, but this is still broken on the
> > JVM
>
> What causes this kind of difference?
>
>
>
U+0007's Unicode 1 name was BELL, and with version 2 the name was removed.
Unicode 1 names are essentiall
BELL now resolves to 🔔 U+1F514 on MoarVM, but this is still broken on the JVM
What causes this kind of difference?
This has been fixed on MoarVM as of
https://github.com/MoarVM/MoarVM/commit/816186484b5cc52f9ff1be6afa3b6f49264335bf
BELL now resolves to 🔔 U+1F514 on MoarVM, but this is still broken on the JVM
# New Ticket Created by Samantha McVey
# Please include the string: [perl #130542]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=130542 >
Fudged test in S02-literals/char-by-name.t
is "\c[BELL]", "🔔"
e about this issue.
> # https://rt.perl.org/Ticket/Display.html?id=130510 >
>
>
> Code:
> my @c[2;2] .= new(:shape(2, 2), , )'
>
>
> Result (2015.12,2016.10):
> [[1 a] [2 b]]
> (1 a 2 b)
>
>
> Result (2016.11,HEAD):
> Cannot assign an array o
# New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev
# Please include the string: [perl #130510]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=130510 >
Code:
my @c[2;2] .= new(:shape(2, 2), , )'
Result (2015.12
On Sun, 06 Nov 2016 20:25:50 -0800, lloyd.fo...@gmail.com wrote:
> 15:18 < llfourn_> m: say (Str andthen .uc orelse "foo") # more golfed
> 15:18 <+camelia> rakudo-moar 1c425f: OUTPUT«-> ;; $_ is raw {
> #`(Block|81391040) ... }»
> 15:23 < llfourn_> m: say (Str andthen .uc orelse "foo")("wee")
> 1
Empty isn't passed as an arg. It's just an empty slip that gets flattened, so
`orelse` ends up with a single block as the arg (the thunked "foo"), which gets
returned.
I don't know whether it should be evaluated first.
On Wed, 09 Nov 2016 15:52:35 -0800, lloyd.fo...@gmail.com wrote:
> Thanks f
Thanks for the update. As viki hinted at, isn't this a bug in itself
(andthen problems aside). Why does Empty as the first arg to orelse return
a block?
say (Empty orelse "foo")
-> ;; $_ is raw { #`(Block|140421623865904) ... }
Where as
say (Any orelse "foo")
returns the correct value.
On Thu
On Sun, 06 Nov 2016 20:25:50 -0800, lloyd.fo...@gmail.com wrote:
> 15:18 < llfourn_> m: say (Str andthen .uc orelse "foo") # more golfed
> 15:18 <+camelia> rakudo-moar 1c425f: OUTPUT«-> ;; $_ is raw {
> #`(Block|81391040) ... }»
> 15:23 < llfourn_> m: say (Str andthen .uc orelse "foo")("wee")
> 1
# New Ticket Created by Lloyd Fournier
# Please include the string: [perl #130034]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=130034 >
15:18 < llfourn_> m: say (Str andthen .uc orelse "foo") # more golfed
15:18 <+camelia>
,ワタシ\nEOS\n");
> my Str $r2 = ("僕\t名詞,代名詞,一般,*,*,*,僕,ボク,ボク\nEOS\n");
> my @expected = (($r1, $r2) xx 3).flat;
> is @actual, @expected;
> }, "MeCab::Tagger should work in the multithread environment";
> ---
>
>
> In the MeCab docume
,ワタシ\nEOS\n");
> my Str $r2 = ("僕\t名詞,代名詞,一般,*,*,*,僕,ボク,ボク\nEOS\n");
> my @expected = (($r1, $r2) xx 3).flat;
> is @actual, @expected;
> }, "MeCab::Tagger should work in the multithread environment";
> ---
>
>
> In the MeCab docume
On Tue, Nov 1, 2016 at 12:01 PM, Itsuki Toyota wrote:
> I think I properly call the MeCab functions from Perl 6(e.g.
> $model.create-tagger, $model.create-lattice) according to the above
> instructions.
> So I think something is wrong in the NativeCall.
>
Not sure NativeCall even knows about TLS
On Tue, Nov 1, 2016 at 12:01 PM, Itsuki Toyota wrote:
> I think I properly call the MeCab functions from Perl 6(e.g.
> $model.create-tagger, $model.create-lattice) according to the above
> instructions.
> So I think something is wrong in the NativeCall.
>
Not sure NativeCall even knows about TLS
S\n");
my Str $r2 = ("僕\t名詞,代名詞,一般,*,*,*,僕,ボク,ボク\nEOS\n");
my @expected = (($r1, $r2) xx 3).flat;
is @actual, @expected;
}, "MeCab::Tagger should work in the multithread environment";
---
In the MeCab documentation page(Japanese)
https://taku910.github
}
method get_sentence {
lattice_get_sentence(self);
}
}
my $lattice = Lattice.new;
$lattice.set_sentence("aaa");
dd $lattice.get_sentence;
done-testing;
t/04-utf8-wrap.cpp
----
#include
#include
#include "04-utf8.cpp"
#ifdef __cplus
Yup!
https://scan.coverity.com/projects/paultcochrane-moarvm
BTW
http://www.coverity.com/press-releases/press_story54_01_08_08/
From: Tobias Leich
Sent: Sunday, October 16, 2016 3:05:36 AM
To: Dmitry Karasik; perl6-compi...@perl.org
Subject: Re: C static analysis on rakudo sources
Hi, I removed the obvious false
Hi, I removed the obvious false-positives from the list.
I'll open tickets by categroy of the errors.
Thank you very much!
Am 15.10.2016 um 17:26 schrieb Dmitry Karasik:
Dear all,
I've had access to a of C/C++ static analysis tool PVS Studio,
and ran it against the latest rakudo
Dear all,
I've had access to a of C/C++ static analysis tool PVS Studio,
and ran it against the latest rakudo sources [1]. The majority of notes seems
to be noise, but there were found some valid concerns (or at least looking
valid to me) f.ex. this:
MoarVM/3rdparty/dynasm/dasm_x86.
t/03-role.h
#if ! defined(HEADER_ROLE_H)
#define HEADER_ROLE_H
#ifdef __cplusplus
extern "C" {
#endif
struct Foo;
void c_insert(struct Foo*, void*);
#ifdef __cplusplus
} /* closing brace for extern "C" */
#endif
#endif /* HEADER_ROLE_H */
--
Fixed with c78f5dc7df5b1398d2867 , tests needed.
> On 19 Sep 2016, at 00:46, Aleks-Daniel Jakimenko-Aleksejev (via RT)
> wrote:
>
> # New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev
> # Please include the string: [perl #129304]
> # in the subject line of all future correspondence abou
# New Ticket Created by Aleks-Daniel Jakimenko-Aleksejev
# Please include the string: [perl #129304]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=129304 >
Differences between 2015.12 and HEAD:
committable6: 2015.12,HEAD .f
> That size looks doubly wrong to me. Its not going to happen for a 3-element
> array no matter how you slice it... so I suspect you're getting the size of
> one element, which is itself twice the size of what C thinks.
>
o happen for a 3-element
array no matter how you slice it... so I suspect you're getting the size of
one element, which is itself twice the size of what C thinks.
1 - 100 of 1791 matches
Mail list logo
