aboutsummaryrefslogtreecommitdiff
path: root/ruby/stepA_interop.rb
diff options
context:
space:
mode:
authorJoel Martin <github@martintribe.org>2015-02-28 10:35:04 -0600
committerJoel Martin <github@martintribe.org>2015-02-28 10:35:04 -0600
commit2ab1e5845c213a9951bee46a0c991202e6c46d5c (patch)
treeac1e5d898523bb892181804aa64f22ec4f4b9032 /ruby/stepA_interop.rb
parent1218ce98a40ef243824fed0efce7160a10fe5f36 (diff)
downloadmal-2ab1e5845c213a9951bee46a0c991202e6c46d5c.tar.gz
mal-2ab1e5845c213a9951bee46a0c991202e6c46d5c.zip
Multiple: interop enhancements.
Diffstat (limited to 'ruby/stepA_interop.rb')
-rw-r--r--ruby/stepA_interop.rb6
1 files changed, 5 insertions, 1 deletions
diff --git a/ruby/stepA_interop.rb b/ruby/stepA_interop.rb
index 6123293..1eff1f1 100644
--- a/ruby/stepA_interop.rb
+++ b/ruby/stepA_interop.rb
@@ -96,7 +96,11 @@ def EVAL(ast, env)
when :macroexpand
return macroexpand(a1, env)
when :"rb*"
- return eval(a1)
+ res = eval(a1)
+ return case res
+ when Array; List.new res
+ else; res
+ end
when :"try*"
begin
return EVAL(a1, env)