diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-06 23:34:26 +0100 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-06 23:34:26 +0100 |
| commit | e49885190142d1655cd4358d402dba5237445409 (patch) | |
| tree | 2f34046ca25848136648d1b931367730e0d1db2f /Lisp/tests.lisp | |
| parent | 016f543b4726b8c46415c78eb0efea86488a4641 (diff) | |
Remove a bunch of DEFINE-OBJECTIVE-C-GENERIC-FUNCTION calls.
darcs-hash:83d1f95687bb761a7fb70c1a901722d4cd2c5caf
Diffstat (limited to 'Lisp/tests.lisp')
| -rw-r--r-- | Lisp/tests.lisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Lisp/tests.lisp b/Lisp/tests.lisp index 94a20b0..ac3eaca 100644 --- a/Lisp/tests.lisp +++ b/Lisp/tests.lisp @@ -472,8 +472,7 @@ ((self ,subnumclass-name) (number ns::ns-number)) (* 2 (super))))) - (is (eval `(define-objective-c-generic-function #/foo:bar:stuff:do: - (a b c d e &rest f)))) + ;; We may omit DEFINE-OBJECTIVE-C-GENERIC-FUNCTION. (is (eval `(define-objective-c-method #/foo:bar:stuff:do: :int ((x ,class-name) (y :int) |