--- a/DebugView.st Wed Sep 07 15:27:34 2022 +0100
+++ b/DebugView.st Tue Nov 15 18:32:52 2022 +0000
@@ -2,7 +2,7 @@
COPYRIGHT (c) 1989 by Claus Gittinger
COPYRIGHT (c) 2015-2017 Jan Vrany
COPYRIGHT (c) 2017 Patrik Svestka
- COPYRIGHT (c) 2021 LabWare
+ COPYRIGHT (c) 2021-2022 LabWare
All Rights Reserved
This software is furnished under a license and may be used
@@ -93,7 +93,7 @@
COPYRIGHT (c) 1989 by Claus Gittinger
COPYRIGHT (c) 2015-2017 Jan Vrany
COPYRIGHT (c) 2017 Patrik Svestka
- COPYRIGHT (c) 2021 LabWare
+ COPYRIGHT (c) 2021-2022 LabWare
All Rights Reserved
This software is furnished under a license and may be used
@@ -5337,6 +5337,13 @@
code := '%1\' , haltStmtDef
].
+ "/ If we're overriding existing method (subclass responsibility), take
+ "/ method protocol from it
+ implClass notNil ifTrue: [
+ cat := (implClass compiledMethodAt: selector) category
+ ].
+
+
self
codeAccept:(code bindWith:proto with:selector with:varName with:argName) withCRs
inClass:receiversClass
@@ -5350,6 +5357,7 @@
]
"Modified: / 23-03-2012 / 09:49:31 / cg"
+ "Modified: / 15-11-2022 / 14:54:51 / Jan Vrany <jan.vrany@labware.com>"
!
doGotoApplicationActionMethod