Skip to content

Instantly share code, notes, and snippets.

use Perl6::Tracer;
my $f = Perl6::Tracer.new();
mp@mp-VirtualBox:~$ perl6 --ll-exception /media/sf_m/p6/perl6tracer2/bin/trace2.p6
Cannot find method 'AT-KEY': no method cache and no .^find_method
at /media/sf_m/p6/perl6tracer2/bin/trace2.p6:3 (<ephemeral file>:<unit>:36)
from /media/sf_m/p6/perl6tracer2/bin/trace2.p6:1 (<ephemeral file>:<unit-outer>:10)
from gen/moar/stage2/NQPHLL.nqp:1289 (/home/mp/rakudo/install/share/nqp/lib/NQPHLL.moarvm:eval:190)
mp@mp-VirtualBox:~$ perl6 --ll-exception /media/sf_m/p6/perl6tracer2/bin/trace.p6 -sl -c <a.p6
Cannot find method 'AT-KEY': no method cache and no .^find_method
at /media/sf_m/p6/perl6tracer2/bin/trace.p6:51 (<ephemeral file>:<unit>:151)
from /media/sf_m/p6/perl6tracer2/bin/trace.p6:1 (<ephemeral file>:<unit-outer>:10)
from gen/moar/stage2/NQPHLL.nqp:1289 (/home/mp/rakudo/install/share/nqp/lib/NQPHLL.moarvm:eval:190)
from gen/moar/stage2/NQPHLL.nqp:1487 (/home/mp/rakudo/install/share/nqp/lib/NQPHLL.moarvm:evalfiles:91)
from gen/moar/stage2/NQPHLL.nqp:1386 (/home/mp/rakudo/install/share/nqp/lib/NQPHLL.moarvm:command_eval:214)
from src/Perl6/Compiler.nqp:59 (/home/mp/rakudo/install/share/nqp/lib/Perl6/Compiler.moarvm:command_eval:93)
from gen/moar/stage2/NQPHLL.nqp:1360 (/home/mp/rakudo/install/share/nqp/lib/NQPHLL.moarvm:command_line:116)
from src/gen/m-main.nqp:39 (/home/mp/rakudo/install/share/perl6/runtime/perl6.moarvm:MAIN:18)
class a
{
has $b;
method new()
{
self.bless(b=>4);
}
method get()
use Perl6::Grammar:from<NQP>;
use Perl6::Actions:from<NQP>;
use QRegex:from<NQP>;
my $tree := Perl6::Grammar.parse( "my \$b = 4;", :actions(Perl6::Actions.new()) );
my %visited_objects= ();
#! perl
# Getopt::Long.pm -- Universal options parsing
# Author : Johan Vromans
# Created On : Tue Sep 11 15:00:12 1990
# Last Modified By: Johan Vromans
# Last Modified On: Tue Jun 16 15:28:03 2015
# Update Count : 1695
# Status : Released
This file has been truncated, but you can view the full file.
#
############################################################
#
# perltidy - a perl script indenter and formatter
#
# Copyright (c) 2000-2014 by Steve Hancock
# Distributed under the GPL license agreement; see file COPYING
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@jaffa4
jaffa4 / nbody.p6
Last active August 29, 2015 14:22
#
# The Great Computer Language Shootout
# http://shootout.alioth.debian.org/
#
# contributed by Christoph Bauer
# converted into Perl by Márton Papp
#
my $pi = 3.141592653589793;
my $solar_mass =(4 * $pi * $pi);
use v6;
# initial code from moritz http://www.perlmonks.org/?node_id=842792
#
# calculator with different operators with different associativity and priority levels
# and wuth brackets
grammar Calc
{
a==0 ? a=1: b=1;