I would love to look into that, however, my son needs all my free time and
I do have very little knowledge about NativeCall.
I hope I will find time in the next days to learn more of this stuff, but I
will not much help :-(
On Fri, 27 Dec 2019 at 07:31, ToddAndMargo via perl6-users <
perl6-users@
Hi Todd,
I refactored your code a bit to make it a bit more readable IMHO. Thinking
on publish it on modules.raku.org if you are not interested to do so.
#`{
Reference:
https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-messagebox
https://stackoverflow.com/questions/591
This is how far I have gotten:
Note that is I use a "0" in
$RtnCode = RegQueryValueExW( HKEY_LOCAL_MACHINE, $lpValueName, 1,
REG_DWORD, $lpData, $lpcbData );
The program dies with no return code.
-T
K:\Windows\NtUtil>perl6 -I. -e "use WinMount :GetLUA; say
GetLUA();"
Reg
On Wednesday, December 25, Alt Mcarter wrote:
> But I'm wondering, is there a way to write token var in such a way that it
> matches <[a..z]>+ EXCEPT when it is a keyword (print, for, to, next, etc.)?
You could use a negative code assertion --
#!/usr/bin/env raku
my @keywords = ;
grammar