(defcomp
  (&key src)
  (div
    (~tw :tokens "not-prose bg-stone-100 rounded-lg p-5 overflow-x-auto my-6")
    (pre
      (~tw :tokens "text-sm leading-relaxed whitespace-pre-wrap break-words font-mono")
      src)))