;; -*- mode: scheme; -*-
()
(let ((black "#333")
      (gray "#999")
      (red "#900")
      (green "#090")
      (pink "#f36")
      (cyan "#099"))
  `((.code
     (((// .c) (// .c1) (// .cm) (// .cp))
      (color ,gray)
      (font-style "italic"))
     (((// .gp) (// .gh) (// .gu))
      (color ,gray))
     ((// .gd)
      (color ,red))
     ((// .gi)
      (color ,green))
     (((// .l) (// .ld) (// .mi) (// .ss) (// .nv))
      (color ,cyan))
     (((// .s) (// .se) (// .sc) (// .s1) (// .s2) (// .si))
      (color ,pink))
     (((// .o) (// .na) (// .nb) (// .nc) (// .nd) (// .ne) (// .nf) (// .nx))
      (color ,red)
      (font-weight "bold"))
     (((// .k) (// .kd) (// .kp) (// .kn) (// .no))
      (color ,black)
      (font-weight "bold")))))
