proc markedList(things: varargs[string]): seq[VNode] =
  for i, thing in things:
    if i > 0:
      result &= text ", "
    result &= buildHtml(mark, text thing)

buildHtml(tdiv):
  text "some things:"
  markedList("foo", "ba")

buildHtml(tdiv):
  text "some things:"
  for node in markedList("foo", "ba"): node