 class Symbol
-  constructor: (@name, @pos) ->
-  toString: -> @name
+  constructor: (@name, @quoted, @pos) ->
+  toString: -> "#{if @quoted then "'" else ""}#{@name}"
 
 class Nil
   toString: -> 'nil'

          else
            error NotFunctionError, "#{JSON.stringify(funname)}(#{funname.constructor.name}) is not a function", funname.pos
      when 'Symbol'
        value = currentEnv().get(expr.name)
        unless value
          error NameError, "undefined valiable \"#{expr.name}\"", expr.pos

      @forwards "'"
      if @expects '(' #list
        return @list()
      else #quoted atom
        return @atom(true)
    else if @expects '(' #calling function
      return @call_fun()
    else #atom
      return @atom(false)

  program: ->
    ret = []
