summaryrefslogtreecommitdiff
path: root/Lisp/method-invocation.lisp
diff options
context:
space:
mode:
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)