From: Mark Wooding Date: Wed, 2 Aug 2017 11:25:34 +0000 (+0100) Subject: src/method-impl.lisp: Mark `sod__obj' as ignorable in effective methods. X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/commitdiff_plain/3001131b3f69ac4aaaae4500a18a0c721b13c88f?ds=inline;hp=--cc src/method-impl.lisp: Mark `sod__obj' as ignorable in effective methods. Very trivial effective methods don't need this, and the warnings are annoying. --- 3001131b3f69ac4aaaae4500a18a0c721b13c88f diff --git a/src/method-impl.lisp b/src/method-impl.lisp index 9f1a48f..cbc7537 100644 --- a/src/method-impl.lisp +++ b/src/method-impl.lisp @@ -661,7 +661,8 @@ (defmethod compute-method-entry-functions ((method basic-effective-method)) (codegen-push codegen) (ensure-var codegen "sod__obj" ilayout-type (make-convert-to-ilayout-inst class - head "me")))) + head "me")) + (deliver-call codegen :void "SOD__IGNORE" "sod__obj"))) (finish-entry (tail) (let* ((head (sod-class-chain-head tail)) (role (if parm-n :valist nil))