anchor.diff:  (defmethod update-evaluation-history-display ((repl repl-mode))
     (flet ((generate-evaluation-history-html (repl)
              (markup:markup 
  -            (:ul (loop for item in (evaluation-history repl)
  +            (:ul (loop for item in (reverse (evaluation-history repl))
                          collect (markup:markup
                                   (:li item)))))))
       (ffi-buffer-evaluate-javascript 
  
positive.code:                                      :flex-flow "column"
                                       :height "100%")
                         ("#input" :padding "6px 0"
                                   :border-bottom "solid 1px lightgray")
                         ("#evaluation-history" :flex-grow "1"
                                         :overflow-y "auto"
                                         :overflow-x "auto")
  
negative.code:   (text-buffer::kill-forward-line (input-cursor repl))
    (update-input-buffer-display repl))
  
  (define-command return-input (&optional (repl (current-repl)))
    "Return inputted text."
    (let ((input (text-buffer::string-representation (input-buffer repl))))
      (add-object-to-evaluation-history repl input))
    (update-display repl))
  
  (defmethod initialize-display ((repl repl-mode))
    (let* ((content (markup:markup
                     (:head (:style (style repl)))
  