src/method-impl.lisp: Fix incorrect argument order.

[sod] / src / method-impl.lisp

diff --git a/src/method-impl.lisp b/src/method-impl.lisp
index 8de19da..1cb9479 100644 (file)
--- a/src/method-impl.lisp
+++ b/src/method-impl.lisp
@@ -335,7 +335,7 @@
                                    (funcall body target)
                                    (dolist (after (reverse after-methods))
                                      (invoke-method codegen :void
-                                                    after basic-tail)))))))
+                                                    basic-tail after)))))))
        (invoke-delegation-chain codegen target basic-tail
                                 around-methods #'method-kernel)))))