gwh/rpl.rb
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

rename SYSEVAL→SHEVAL, move code into program to avoid error when building gem

Browse source
This commit is contained in:
Gwenhael Le Moine 2023-03-19 11:44:54 +01:00
parent 95eb598079
commit d53b3b6875
No known key found for this signature in database
GPG key ID: FDFE3669426707A7
4 changed files with 10 additions and 27 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/rpl.rb
View file

@ -5,7 +5,7 @@ require 'rpl/types'
require 'rpl/words'
class Rpl < Interpreter
VERSION = '0.16.0'
VERSION = '0.16.1'
include Types
@ -64,7 +64,6 @@ class Rpl < Interpreter
prepend RplLang::Words::Store
prepend RplLang::Words::String
prepend RplLang::Words::StringAndList
prepend RplLang::Words::System
prepend RplLang::Words::Test
prepend RplLang::Words::TimeAndDate
prepend RplLang::Words::Trig

1
lib/rpl/words.rb
View file

@ -18,5 +18,4 @@ require 'rpl/words/time-date'
require 'rpl/words/trig'
require 'rpl/words/logarithm'
require 'rpl/words/filesystem'
require 'rpl/words/system'
require 'rpl/words/list'

9
lib/rpl/words/program.rb
View file

@ -23,6 +23,15 @@ module RplLang
end
end )
@dictionary.add_word!( ['sheval'],
category,
'( string -- output ) run string in OS shell and put output on stack',
proc do
args = stack_extract( [[RplString]] )
@stack << Types.new_object( RplString, "\"#{`#{args[0].value}`}\"" )
end )
@dictionary.add_word!( ['↴', 'lsto'],
category,
'( content name -- ) store to local variable',

24
lib/rpl/words/system.rb
View file

@ -1,24 +0,0 @@
# frozen_string_literal: true
module RplLang
module Words
module System
include Types
def populate_dictionary
super
category = 'System'
@dictionary.add_word!( ['syseval'],
category,
'( string -- output ) run string in OS shell and put output on stack',
proc do
args = stack_extract( [[RplString]] )
@stack << Types.new_object( RplString, "\"#{`#{args[0].value}`}\"" )
end )
end
end
end
end