This file contains hidden or 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 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) |
This file contains hidden or 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
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) |
This file contains hidden or 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 a | |
{ | |
has $b; | |
method new() | |
{ | |
self.bless(b=>4); | |
} | |
method get() |
This file contains hidden or 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 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= (); |
This file contains hidden or 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
#! 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.
This file contains hidden or 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
# | |
############################################################ | |
# | |
# 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 |
This file contains hidden or 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
# | |
# 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); |
This file contains hidden or 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; | |
# 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 | |
{ |
This file contains hidden or 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==0 ? a=1: b=1; |