Display quoted values in repl

lib/chervil/ast/quotation.rb

@@ -8,7 +8,7 @@ module Chervil::AST
 
     def evaluate(env)
       if @value.is_a?(List)
-        @value.elements
+        self
       else
         @value.evaluate(env)
       end

lib/chervil/repl.rb

@@ -12,6 +12,12 @@ module Chervil
         '#f'
       when AST::Function
         "<function: #{obj.name.name}(#{obj.params.map(&:name).join(' ')})>"
+      when AST::Number
+        display(obj.value)
+      when AST::List
+        "(#{obj.elements.map { |el| display(el) }.join(' ')})"
+      when AST::Quotation
+        "\'#{display(obj.value)}"
       when Float
         if obj.floor.to_f == obj
           obj.to_i