Skip to content


Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 48390d5aff
Fetching contributors…

Cannot retrieve contributors at this time

executable file 43 lines (26 sloc) 0.778 kb
use v6;
module Perlito5::Perl6::Runtime {
sub ref ($obj) { #OK
my $s = $obj.WHAT.perl;
return 'ARRAY' if $s eq 'Array';
return 'HASH' if $s eq 'Hash';
return '' if $s eq 'Str';
return '' if $s eq 'Int';
return '' if $s eq 'Rat';
# TODO - REF, CODE, ...
return $s;
=head1 NAME
Provides runtime routines for the Perlito-in-Perl5 compiled code
=head1 AUTHORS
The Pugs Team E<lt>perl6-compiler@perl.orgE<gt>.
Copyright 2006, 2009, 2011, 2012 by Flavio Soibelmann Glock and others.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
See L<>
Jump to Line
Something went wrong with that request. Please try again.