summaryrefslogtreecommitdiff
path: root/Lisp/method-invocation.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2007-09-21 16:17:57 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2007-09-21 16:17:57 +0200
commit4bcd7e54d49e128f4a8e713faa2a25f4797e0120 (patch)
tree8d464a45de3ed8f32d7d19ecefc38ac000d82946 /Lisp/method-invocation.lisp
parent17ee7b8790aff3efe19551796efec889e9d0b51d (diff)
Make the test suite work on Mac OS X.
darcs-hash:d91ddd8e48860553eae62249043f13dd973a40c2
Diffstat (limited to 'Lisp/method-invocation.lisp')
-rw-r--r--Lisp/method-invocation.lisp1
1 files changed, 0 insertions, 1 deletions
diff --git a/Lisp/method-invocation.lisp b/Lisp/method-invocation.lisp
index e09292b..7334fc3 100644
--- a/Lisp/method-invocation.lisp
+++ b/Lisp/method-invocation.lisp
@@ -332,7 +332,6 @@ Returns: *result* --- the return value of the method invocation.
((selector)
(setf (argref :pointer i) (pointer-to (selector arg))))
((:string)
- (warn "HERE! HERE!")
(setf (argref :string i)
(alloc-string-and-register arg)))
((struct union)