anchor.diff:                             :margin "0")
                          (li :padding "2px")))
             :documentation "The CSS applied to a REPL when it is set-up.")
  +   (input-buffer :accessor input-buffer
  +                 :initform "Hello World")
      (evaluation-history :accessor evaluation-history
                          :initform (list))
      (constructor
  
positive.code:                           (:div :id "completions" "")))))
           (insert-content (ps:ps (ps:chain document
                                            (write (ps:lisp content))))))
      (ffi-buffer-evaluate-javascript (buffer repl) insert-content))
    (print "hello world"))
  
  (defmethod add-object-to-evaluation-history ((repl repl-mode) item)
    (push item (evaluation-history repl)))
  
negative.code:       (initialize-display mode)
        (add-object-to-evaluation-history mode "goldfish")
        (add-object-to-evaluation-history mode "sunfish")
        (update-evaluation-history-display mode)
        (update-input-buffer-display mode)))))
  
  (defmethod initialize-display ((repl repl-mode))
    (let* ((content (markup:markup
  