File tree Expand file tree Collapse file tree 2 files changed +59
-0
lines changed Expand file tree Collapse file tree 2 files changed +59
-0
lines changed Original file line number Diff line number Diff line change
1
+ use strict;
2
+ use warnings;
3
+
4
+ package Perlito6::X64::Assembler ;
5
+
6
+ sub new {
7
+ my $class = shift ;
8
+ bless {@_ }, $class ;
9
+ }
10
+
11
+ sub to_hex {
12
+ my $self = $_ [0];
13
+ my $text = $_ [1];
14
+ return ' ' ;
15
+ }
16
+
17
+ 1;
18
+
19
+ __END__
20
+
21
+ =pod
22
+
23
+ =head1 Perlito5::X64::Assembler
24
+
25
+ The Perlito5 x64 backend
26
+
27
+ =head1 Synopsis
28
+
29
+ use Perlito5::X64::Assembler;
30
+ my $asm = Perlito6::X64::Assembler->new();
31
+ say $asm->to_hex();
32
+
33
+ =cut
34
+
35
+
Original file line number Diff line number Diff line change
1
+ # =begin Pod
2
+ #
3
+ # =head1 Perlito6::X64::Assembler
4
+ #
5
+ # The Perlito6 x64 backend
6
+ #
7
+ # =head1 Synopsis
8
+ #
9
+ # use Perlito6::X64::Assembler;
10
+ # my $asm = Perlito6::X64::Assembler.new();
11
+ # say $asm.to_hex();
12
+ #
13
+ # =end Pod
14
+
15
+ class Perlito6::X64::Assembler {
16
+
17
+ method to_hex ($ text ) {
18
+ return " " ;
19
+ }
20
+
21
+ }
22
+
23
+ # vim: ft=perl6
24
+
You can’t perform that action at this time.
0 commit comments