GDBInstructionsAndSourceLine.st
changeset 133 026074322527
parent 132 70c17add3b24
child 158 f767120c1e1e
--- a/GDBInstructionsAndSourceLine.st	Thu Aug 16 10:06:02 2018 +0100
+++ b/GDBInstructionsAndSourceLine.st	Thu Aug 16 10:44:59 2018 +0100
@@ -155,6 +155,14 @@
     "Created: / 07-08-2018 / 11:32:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GDBInstructionsAndSourceLine methodsFor:'enumerating'!
+
+instructionsDo: aBlock
+    line_asm_insn ? #() do: aBlock
+
+    "Created: / 16-08-2018 / 11:31:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !GDBInstructionsAndSourceLine methodsFor:'initialization & release'!
 
 setArchitecture: aGDBArchitecture
@@ -172,13 +180,13 @@
 
 !GDBInstructionsAndSourceLine methodsFor:'testing'!
 
-isBranchInstruction
+isBranch
     ^ false
 
     "Created: / 03-07-2018 / 14:39:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-isReturnInstruction
+isReturn
     ^ false
 
     "Created: / 03-07-2018 / 14:39:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"