ACME::Bare::Metal in action

2 files changed, 13 insertions, 0 deletions

diff --git a/interpreter/ElymasSys.pm b/interpreter/ElymasSys.pm
index 7e6d1b9..becc4d0 100644
--- a/interpreter/ElymasSys.pm
+++ b/interpreter/ElymasSys.pm
@@ -4,6 +4,7 @@ use strict;
 use warnings;
 
 use Elymas;
+use ElymasX86;
 use POSIX;
 
 my $rwmask = &POSIX::O_RDONLY | &POSIX::O_WRONLY | &POSIX::O_RDWR;
@@ -19,6 +20,7 @@ our $sys = {
   'out' => [enstruct(createFile(1, &POSIX::O_WRONLY)), 'passive'],
   'err' => [enstruct(createFile(2, &POSIX::O_WRONLY)), 'passive'],
   'argv' => [[map { [$_, 'string'] } @ARGV[1 .. $#ARGV]], ['array', 'sys .argv', ['range', 0, $#ARGV - 1], ['string']], 'passive'],
+  'x86' => [enstruct($ElymasX86::x86), 'passive'],
 };
 
 sub createFile {
diff --git a/interpreter/ElymasX86.pm b/interpreter/ElymasX86.pm
new file mode 100644
index 0000000..f825fdd
--- /dev/null
+++ b/interpreter/ElymasX86.pm
@@ -0,0 +1,11 @@
+package ElymasX86;
+
+use strict;
+use warnings;
+
+use Elymas;
+use ACME::Bare::Metal;
+
+our $x86 = {
+  #FIXME
+};