Evaluate identifier referents

lib/chervil/ast/identifier.rb

@@ -11,7 +11,7 @@ module Chervil::AST
     end
 
     def evaluate(env)
-      env.get(@name)
+      env.get(@name).evaluate(env)
     end
   end
 end

spec/ast/function_spec.rb

@@ -17,7 +17,7 @@ module Chervil
             )
           ],
         ).call(
-          [5.0]
+          [AST::Number.new(5.0)]
         )
       ).to eq(25.0)
     end

spec/ast/identifier_spec.rb

@@ -6,7 +6,7 @@ module Chervil
       value = AST::Number.new(5.0)
       definition = AST::Definition.new(identifier, value)
       definition.evaluate(env)
-      expect(identifier.evaluate(env)).to eq(value)
+      expect(identifier.evaluate(env)).to eq(5.0)
     end
   end
 end

spec/interpreter_spec.rb

@@ -10,7 +10,7 @@ module Chervil
       env = Env.new
       interpret('(define x 5)', env)
       expect(env.get("x")).to eq(AST::Number.new(5.0))
-      expect(interpret('x', env).first).to eq(AST::Number.new(5.0))
+      expect(interpret('x', env).first).to eq(5.0)
     end
   end
 end