Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Perlito backend - stub code for Perlito6::X64::Assembler, Perlito5::X…
…64::Assembler
  • Loading branch information
fglock committed Mar 24, 2013
1 parent aaca2e2 commit 0ff7ea2
Show file tree
Hide file tree
Showing 2 changed files with 59 additions and 0 deletions.
35 changes: 35 additions & 0 deletions src5/lib/Perlito5/X64/Assembler.pm
@@ -0,0 +1,35 @@
use strict;
use warnings;

package Perlito6::X64::Assembler;

sub new {
my $class = shift;
bless {@_}, $class;
}

sub to_hex {
my $self = $_[0];
my $text = $_[1];
return '';
}

1;

__END__

=pod
=head1 Perlito5::X64::Assembler
The Perlito5 x64 backend
=head1 Synopsis
use Perlito5::X64::Assembler;
my $asm = Perlito6::X64::Assembler->new();
say $asm->to_hex();
=cut


24 changes: 24 additions & 0 deletions src6/lib/Perlito6/X64/Assembler.pm
@@ -0,0 +1,24 @@
# =begin Pod
#
# =head1 Perlito6::X64::Assembler
#
# The Perlito6 x64 backend
#
# =head1 Synopsis
#
# use Perlito6::X64::Assembler;
# my $asm = Perlito6::X64::Assembler.new();
# say $asm.to_hex();
#
# =end Pod

class Perlito6::X64::Assembler {

method to_hex($text) {
return "";
}

}

# vim: ft=perl6

0 comments on commit 0ff7ea2

Please sign in to comment.