GDBInstructionsAndSourceLine.st
changeset 132 70c17add3b24
parent 131 21d97c0ee600
child 133 026074322527
--- a/GDBInstructionsAndSourceLine.st	Tue Aug 07 12:16:08 2018 +0100
+++ b/GDBInstructionsAndSourceLine.st	Thu Aug 16 10:06:02 2018 +0100
@@ -155,6 +155,21 @@
     "Created: / 07-08-2018 / 11:32:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GDBInstructionsAndSourceLine methodsFor:'initialization & release'!
+
+setArchitecture: aGDBArchitecture
+    self instructions do:[:e | e setArchitecture: aGDBArchitecture ]
+
+    "Created: / 16-08-2018 / 09:39:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+setDebugger: aGDBDebugger
+    super setDebugger: aGDBDebugger.
+    self instructions do:[:e | e setDebugger: aGDBDebugger ]
+
+    "Created: / 16-08-2018 / 09:33:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !GDBInstructionsAndSourceLine methodsFor:'testing'!
 
 isBranchInstruction