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 Net::ZMQ; | |
use Net::ZMQ::Constants; | |
use Net::ZMQ::Poll; | |
say "starting thread..."; | |
my Thread $t .= start: { | |
my Net::ZMQ::Context $c .= new; | |
my Net::ZMQ::Socket $s .= new: $c, ZMQ_REP; | |
$s.bind: "tcp://127.0.0.1:29108"; | |
device($s, $s, :queue); |
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
Finished specialization of 'rotr' (cuid: cuid_24_1447861306.51634) | |
Spesh of 'rotr' (cuid: cuid_24_1447861306.51634, file: /home/arne/programming/perl/libdigest-perl6/lib/Digest/SHA.pm:67) | |
Callsite 0x7f3c9745ca00 (2 args, 2 pos) | |
Positional flags: obj, obj | |
BB 0 (0x8d6d5e8): | |
line: 67 (pc 0) | |
Instructions: | |
no_op |
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
import Graphics.UI.Gtk as Gtk | |
import System.Taffybar | |
import System.Taffybar.Battery | |
import System.Taffybar.NetMonitor | |
import System.Taffybar.SimpleClock | |
import System.Taffybar.Systray | |
import System.Taffybar.Pager | |
import System.Taffybar.TaffyPager | |
import System.Taffybar.Widgets.PollingGraph |
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
(let ((x 0)) | |
(defmacro foo () | |
(incf x) | |
x | |
) | |
) | |
(loop for i from 0 to 3 do (format t "~A~%" (foo))) | |
; Results: |
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
class C: | |
def __new__(cls, *args): | |
print("C.__new__") | |
return super().__new__(cls) | |
class D: | |
pass | |
C(1,2,3) | |
D(1,2,3) |
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
a=2 | |
def foo(): | |
if 0: a = 1 | |
print(a) | |
foo() |
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
- QAST::CompUnit | |
- QAST::Block | |
- QAST::Stmts | |
- QAST::Var(local __args__ :decl(param)) | |
- QAST::Stmts | |
- QAST::Stmts | |
- QAST::Op(say) | |
- QAST::Var(lexical x :decl()) | |
MoarVM dump of binary compilation unit: |
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
Test Summary Report | |
------------------- | |
t/spec/S02-types/isDEPRECATED.rakudo.jvm (Wstat: 0 Tests: 0 Failed: 0) | |
Parse errors: Bad plan. You planned 20 tests but ran 0. | |
t/spec/S02-types/mixhash.rakudo.jvm (Wstat: 0 Tests: 191 Failed: 1) | |
Failed test: 72 | |
t/spec/S04-phasers/rvalue.rakudo.jvm (Wstat: 0 Tests: 16 Failed: 0) | |
TODO passed: 10-12 | |
t/spec/S05-mass/properties-derived.rakudo.jvm (Wstat: 0 Tests: 256 Failed: 0) | |
TODO passed: 241-246 |
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/src/vm/jvm/runtime/org/perl6/nqp/sixmodel/reprs/P6Opaque.java b/src/vm/jvm/runtime/org/perl6/nqp/sixmodel/reprs/P6Opaque.java | |
index dc9fd60..9cb26cb 100644 | |
--- a/src/vm/jvm/runtime/org/perl6/nqp/sixmodel/reprs/P6Opaque.java | |
+++ b/src/vm/jvm/runtime/org/perl6/nqp/sixmodel/reprs/P6Opaque.java | |
@@ -644,7 +644,7 @@ public class P6Opaque extends REPR { | |
// Ensure target type is also P6opaque-based. | |
if (!(newType.st.REPR instanceof P6Opaque)) | |
throw ExceptionHandling.dieInternal(tc, "P6opaque can only rebless to another P6opaque-based type"); | |
- | |
+ |
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
my role Foo { | |
has $!setup; | |
method postcircumfix:<( )>($args) { | |
#say self.?bar // 'not what we want'; | |
if nqp::can(self, 'bar') { say self.bar } | |
else { say 'no what we want' } | |
} | |
} |
NewerOlder