help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

font-locking of sexpr form broken


From: livingcosmos.org
Subject: font-locking of sexpr form broken
Date: Thu, 27 Dec 2007 19:51:26 -0800 (PST)
User-agent: G2/1.0

The font-locking gets messed up on the second format because I have a
s-expr within the double quotes


(defun calc-frame (noun r)
  (let* ((noun-shape (noun-shape noun))
         (ls (length noun-shape))
         (remaining-lead-axes (- ls r)))
    (progn
      (format t "noun-shape: ~A remaining: ~A~%" noun-shape remaining-
lead-axes)
      (format t "
(make-frame :length  ~A
            :shape   ~A
            :noun     ~A
            :n-cells ~A
" remaining-lead-axes (subseq noun-shape 0 remaining-lead-axes)
noun (- ls remaining-lead-axes))
      (make-frame :length  remaining-lead-axes
                  :shape   (subseq noun-shape 0 remaining-lead-axes)
                  :noun     noun
                  :n-cells (- ls remaining-lead-axes)))))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]