From 56c1707540d46a17f03c59b294a9ace38593d323 Mon Sep 17 00:00:00 2001 From: Drahflow Date: Sat, 22 Dec 2012 18:24:02 +0100 Subject: ACME::Bare::Metal in action --- interpreter/ElymasSys.pm | 2 ++ interpreter/ElymasX86.pm | 11 +++++++++++ 2 files changed, 13 insertions(+) create mode 100644 interpreter/ElymasX86.pm 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 +}; -- cgit v1.2.3