diff options
| author | Drahflow <drahflow@gmx.de> | 2013-01-07 15:30:21 +0100 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2013-01-07 15:30:21 +0100 |
| commit | abf250d1efb699ca0bfedc62c5ba1278c08fc32d (patch) | |
| tree | 52754094f5dd5fde54b6aa22570baea63f7d465b /interpreter/ElymasSys.pm | |
| parent | e816e6bbbfe03b0ab15344155250ced004a7f924 (diff) | |
Structs and scopes now inseparable
Diffstat (limited to 'interpreter/ElymasSys.pm')
| -rw-r--r-- | interpreter/ElymasSys.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/interpreter/ElymasSys.pm b/interpreter/ElymasSys.pm index 2b7132f..9cb07d4 100644 --- a/interpreter/ElymasSys.pm +++ b/interpreter/ElymasSys.pm @@ -14,13 +14,13 @@ our $sys = { my ($data, $scope) = @_; my $file = createFile(-1, &POSIX::O_RDONLY); - push @$data, [enstruct($file)]; + push @$data, [$file, ['struct']]; }, ['func', 'sys .file'], 'active'], - 'in' => [enstruct(createFile(0, &POSIX::O_RDONLY)), 'passive'], - 'out' => [enstruct(createFile(1, &POSIX::O_WRONLY)), 'passive'], - 'err' => [enstruct(createFile(2, &POSIX::O_WRONLY)), 'passive'], + 'in' => [createFile(0, &POSIX::O_RDONLY), ['struct'], 'passive'], + 'out' => [createFile(1, &POSIX::O_WRONLY), ['struct'], 'passive'], + 'err' => [createFile(2, &POSIX::O_WRONLY), ['struct'], 'passive'], 'argv' => [[map { [$_, 'string'] } @ARGV[1 .. $#ARGV]], ['array', 'sys .argv', ['range', 0, $#ARGV - 1], ['string']], 'passive'], - 'asm' => [enstruct($ElymasAsm::asm), 'passive'], + 'asm' => [$ElymasAsm::asm, ['struct'], 'passive'], }; sub createFile { |