Re: My Windows Modules

2019-12-31 Thread ToddAndMargo via perl6-users
Hi All, My latest three modules. two more in the works that use these: WinReg.pm6 WinMessageBox NativeConstants.pm6 WinReg.pm6 about killed me! -T # unit module WinReg; # WinReg.pm6 #`{ Utilities to operate on the Windows registry perl6 -I. -c WinReg.pm6 Test one liner:

Re: My pop ups for windows module

2019-12-31 Thread ToddAndMargo via perl6-users
Hi All, My latest three modules. two more in the works that use these: WinReg.pm6 WinMessageBox NativeConstants.pm6 WinReg.pm6 about killed me! -T # unit module WinReg; # WinReg.pm6 #`{ Utilities to operate on the Windows registry perl6 -I. -c WinReg.pm6 Test one liner:

NativeCall bug: can't find final ')'

2019-12-31 Thread ToddAndMargo via perl6-users
perl6 -I. -e "use WinReg :WinReadRegKey; say WinReadRegKey( HKEY_LOCAL_MACHINE, Q[SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\system], Q[EnableLUA] );" ===SORRY!=== Error while compiling K:\Windows\NtUtil\WinReg.pm6 (WinReg) Unable to parse expression in argument list; couldn't

Request for Enhancement: Native Call error

2019-12-31 Thread ToddAndMargo via perl6-users
Hi All, Request for Enhancement: Native Call error perl6 -I. -e "use WinReg :WinReadRegKey; say WinReadRegKey( HKEY_LOCAL_MACHINE, Q[SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\system], Q[EnableLUA] );" Native call expected argument that references a native integer, but got P6int

global variables and modules question

2019-12-31 Thread ToddAndMargo via perl6-users
Hi All, Is there a way to restrict variables, constants, enums and such declared in the global section of a module to only the module? Many thanks, -T -- ~ When we ask for advice, we are usually looking for an accomplice. --

Re: I need helping understanding a pointer example

2019-12-31 Thread ToddAndMargo via perl6-users
On 2019-12-31 01:17, Todd Chester via perl6-users wrote: On 2019-12-30 23:14, Veesh Goldman wrote: Method declares a method as opposed to a function. The difference is that in a method, the first argument passed to the function is bound to `self`, which represents the object the call was

Retrofit built-in types with custom roles?

2019-12-31 Thread Stuart Hungerford
Hi, I'm a complete Raku novice and I'm still at the stage of understanding how the major language features are used idiomatically. As an exercise I'd like to do the equivalent of Haskell's typeclass implementation for the built in numeric types. I understand this may well be a misguided

Re: NativeCall Doc booboo

2019-12-31 Thread ToddAndMargo via perl6-users
On 2019-12-31 09:17, JJ Merelo wrote: Hi, El mar., 31 dic. 2019 a las 5:54, Todd Chester via perl6-users (mailto:perl6-users@perl.org>>) escribió: Hi All, https://docs.raku.org/language/nativecall.html#Passing_and_returning_values Did anyone else discover the mistake, hopefully

Re: NativeCall Doc booboo

2019-12-31 Thread JJ Merelo
Hi, El mar., 31 dic. 2019 a las 5:54, Todd Chester via perl6-users (< perl6-users@perl.org>) escribió: > Hi All, > > https://docs.raku.org/language/nativecall.html#Passing_and_returning_values > > Did anyone else discover the mistake, hopefully not the hard way like I > did. Anyone get weird

Re: play with raku and autobiographical numbers

2019-12-31 Thread Tobias Boege
On Tue, 31 Dec 2019, Marc Chantreux wrote: > hello, > > 2020 describes itself as it is composed by > > 2 0 > 0 1 > 2 2 > 0 3 > > perfect golf excuse! I have : > > sub is_autobiographic (\x) { > my \s = x.Str; > my @r = s.comb; > my %appearance_of; >

play with raku and autobiographical numbers

2019-12-31 Thread Marc Chantreux
hello, 2020 describes itself as it is composed by 2 0 0 1 2 2 0 3 perfect golf excuse! I have : sub is_autobiographic (\x) { my \s = x.Str; my @r = s.comb; my %appearance_of; %appearance_of{$_}++ for @r; x ~~ join '',

Re: I need helping understanding a pointer example

2019-12-31 Thread Todd Chester via perl6-users
On 2019-12-30 23:14, Veesh Goldman wrote: Method declares a method as opposed to a function. The difference is that in a method, the first argument passed to the function is bound to `self`, which represents the object the call was made on. In traditional perl style, when you call a method