Ignore:
Timestamp:
Mar 13, 2008, 3:49:38 PM (12 years ago)
Author:
gz
Message:

fix compiler warnings

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/cocoa-ide/hemlock/src/symbol-completion.lisp

    r8428 r8774  
    251251                     (dabbrev-match-p context (symbol-name sym)))
    252252            (vector-push-extend sym seq))))
    253       (stable-sort seq #'(lambda (s1 s2)
    254                            (and (or (boundp s1) (fboundp s1))
    255                                 (not (or (boundp s2) (fboundp s2))))))
     253      (setq seq
     254            (stable-sort seq #'(lambda (s1 s2)
     255                                 (and (or (boundp s1) (fboundp s1))
     256                                      (not (or (boundp s2) (fboundp s2)))))))
    256257      ;; Now convert to strings - and downcase for inserting in buffer.
    257258      (dotimes (i (length seq))
Note: See TracChangeset for help on using the changeset viewer.