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:      (ps:ps (setf (ps:chain document (get-element-by-id "prompt") |innerHTML|)
                    (ps:lisp (generate-input-buffer-html repl)))))))
  
  (defmethod update-display ((repl repl-mode))
    (update-evaluation-history-display repl)
    (update-input-buffer-display repl))
  
  (defmethod insert ((repl repl-mode) characters)
    (cluffer:insert-item (input-cursor repl) characters)
    (update-input-buffer-display repl))
  