anchor.diff:              (:div
                :class
                (if (focus-p (@ this props)) "hilited" "hilited-parent")
  +             :key (unique-id)
                (%make-segments (prop text)
                                (remove-if-not
                                 (lambda (x)
  
positive.code:            (psx
              (:div
               :on-click (@ this handle-click)
               (:div "title placeholder")
               (:hilited-text
                :text (prop text)
                :opinions (prop opinions)
                :focus (state focus)
  
negative.code:              (psx
                (:div
                 :class "opinion"
                 :key (unique-id)
                 :style (create position :absolute
                                top "1em"
                                left (prop horizontal-position))
                 (:div :key (unique-id) "title placeholder")
                 (:hilited-text
                  :key (unique-id)
                  :... (@ this props)
                  :text (@ op comment)
                  :opinions (prop opinions (slice 1))
  