Changeset 12235


Ignore:
Timestamp:
Jun 8, 2009, 8:23:18 AM (10 years ago)
Author:
gb
Message:

Meta-.: handle errors, report via EDITOR-ERROR. Screw: still need
to handle errors when invoked via dialogs,etc.
MATCH-DEFINITION-CONTEXT-FOR-METHOD: if specializer is T, match
a symbol or (symbol T).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/cocoa-ide/hemlock/src/edit-defs.lisp

    r8464 r12235  
    9191    (if error
    9292      (editor-error "unreadable name: ~s" string)
    93       (edit-definition fun-name))))
     93      (handler-case (edit-definition fun-name)
     94        (error (c) (editor-error (format nil "~a" c)))))))
     95     
    9496
    9597#|
     
    267269                         (class
    268270                          (let* ((name (class-name spec)))
    269                             (or (if (eq name t) (eq arg t))
     271                            (or (and (eq name t) (symbolp arg))
    270272                                (and (consp arg)
    271273                                     (symbolp (car arg))
Note: See TracChangeset for help on using the changeset viewer.