Add #inspect

txus · Mar 10, 2011 · 3b9dbcc · 3b9dbcc
1 parent d2e2349
commit 3b9dbcc
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 0 deletions.
diff --git a/lib/schemer/interpreter.rb b/lib/schemer/interpreter.rb
@@ -28,6 +28,10 @@ def initialize(ast = nil)
           nil
         end)
 
+        env.add_binding(:inspect, lambda do |object|
+          object.inspect
+        end)
+
         env.add_binding(:define, lambda do |parameters, body|
           if parameters.is_a?(AST::Identifier)
             # We are declaring a variable. We must eager-evaluate the value.

diff --git a/spec/schemer/interpreter_spec.rb b/spec/schemer/interpreter_spec.rb
@@ -49,6 +49,12 @@ module Schemer
         end
       end
 
+      describe "#inspect" do
+        it 'returns the object inspected' do
+          "(inspect x)".should evaluate_to("#<Identifier::x>")
+        end
+      end
+
       describe "#define" do
         it 'defines a variable' do
           expression = "(define number 3)"