Wenzel P. P. Peppmeyer gfldex
gfldex
/ gist:1218287
Created
September 15, 2011 01:16
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| [Scimitar, New Setup 1] | |
| Capacitor Power Relay II | |
| Capacitor Power Relay II | |
| LADAR Backup Array II | |
| LADAR Backup Array II | |
| 10MN Afterburner II | |
| Large Shield Extender II | |
| Invulnerability Field II | |
| Invulnerability Field II |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use v6; | |
| class Signal { | |
| has @.slots is rw; | |
| multi method connect(Code $f){ | |
| @.slots.push($f); | |
| return self; | |
| } |
gfldex
/ cygwin_install.patch
Created
February 22, 2012 17:40
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| diff --git a/tools/build/Makefile.in b/tools/build/Makefile.in | |
| index 455d819..929446d 100644 | |
| --- a/tools/build/Makefile.in | |
| +++ b/tools/build/Makefile.in | |
| @@ -296,8 +296,8 @@ install: all | |
| $(CHMOD) 755 $(DESTDIR)$(PARROT_BIN_DIR)/$(PERL6_EXE) | |
| $(MKPATH) $(DESTDIR)$(DOCDIR)/rakudo | |
| $(MKPATH) $(DESTDIR)$(DOCDIR)/rakudo/announce | |
| - $(CP) $(DOCS) $(DESTDIR)$(DOCDIR)/rakudo | |
| - $(CP) $(DOCS)/announce $(DESTDIR)$(DOCDIR)/rakudo/announce |
gfldex
/ proposed_syntax.p6
Created
February 26, 2012 16:40
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| http://www.haskell.org/ghc/docs/7.4-latest/html/libraries/haskell98-2.0.0.1/Time.html | |
| http://en.wikipedia.org/wiki/Gregorian_calendar | |
| http://en.wikipedia.org/wiki/Leap_year | |
| http://en.wikipedia.org/wiki/Leap_second | |
| http://en.wikipedia.org/wiki/Unix_time | |
| # we have 3 different official international clocks right now: | |
| say now.IAT; # International Atomic Time | |
| say now.GPS; # == IAT - 19s; |
gfldex
/ gist:2726387
Created
May 18, 2012 16:55
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| enum E (Jan => 1, Feb => 2); | |
| class A { | |
| class B { | |
| has $.i is rw; | |
| } | |
| } | |
| our method ACCEPTS(E:D $self: A::B:D $topic){ | |
| say "I'm not called"; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use v6; | |
| subset HTMLColor of Str where { * ~~ / <:hexdigit> ** 6 / }; | |
| sub alternator (HTMLColor $a is copy, HTMLColor $b is copy){ | |
| return sub () { | |
| return (($a, $b) = ($b, $a))[0]; | |
| } | |
| } |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use v6; | |
| subset HTMLColor of Str where { * ~~ / '#'<:hexdigit> ** 6 / }; | |
| sub alternator (HTMLColor $a is copy, HTMLColor $b is copy){ | |
| return sub () { | |
| return (($a, $b) = ($b, $a))[0]; | |
| } | |
| } |
gfldex
/ typed callback
Created
July 23, 2012 12:21
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| multi a(&callback:(:$before, *@params)) { | |
| say &callback(1,2,3), 'before'; | |
| } | |
| multi a(&callback:(:$after, *@params)) { | |
| say 'after', &callback(4,5,6); | |
| } | |
| my $cb1 = sub(:$after, *@params) { | |
| return @params.join('-'); |
gfldex
/ recursive-grammar.p6
Created
September 4, 2012 21:39
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use v6; | |
| my $s1 = 'AA foo; BB baz; AA bar;'; | |
| my $s2 = 'AA buzz;'; | |
| grammar G { | |
| rule TOP { [ [ <ta> | <tb> ] <.ws> ]+ } | |
| rule ta { 'AA' <name>';' { say $/<name>.Str; } } | |
| rule tb { 'BB' <name>';' { G.parse($s2); say $/<name>.Str; } } | |
| rule name { \w+ } |
gfldex
/ gist:3808313
Created
September 30, 2012 20:06
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| nice /usr/bin/perl Configure.pl --with-parrot=/home/dex/rakudo/install/bin/parrot --make-install && nice make all install | |
| HEAD is now at a0b4c57... Catch undeclared variables properly. | |
| Building NQP ... | |
| /usr/bin/perl Configure.pl --with-parrot=/home/dex/rakudo/install/bin/parrot.exe --make-install | |
| Verifying installation ... | |
| Using /home/dex/rakudo/install/bin/parrot.exe (version RELEASE_4_4_0). | |
| sh: line 0: cd: 3rdparty/dyncall: No such file or directory | |
| Command failed (status 256): cd 3rdparty/dyncall && sh configure | |
| Command failed (status 256): /usr/bin/perl Configure.pl --with-parrot=/home/dex/rakudo/install/bin/parrot.exe --make-install |
OlderNewer