--- a/tests/GDBDebuggerTestsR.st	Mon Jul 02 08:45:58 2018 +0200
+++ b/tests/GDBDebuggerTestsR.st	Fri Jun 22 11:39:15 2018 +0100
@@ -418,6 +418,23 @@
     "Modified: / 03-04-2018 / 21:08:26 / jv"
 !
 
+test_disassembly_01
+    | asm |
+
+    debugger := GDBDebugger new.
+    debugger executable: GDBDebuggeesResource current binaryFactorial1.
+    debugger send: 'r' andWaitFor: GDBThreadGroupExitedEvent.
+
+    asm := debugger disassembleFile: 'factorial1.c' line: 3 count: nil.
+
+    self assert: asm isSequenceable.
+    self assert:(asm first isKindOf: GDBInstructionsAndSourceLine).
+
+    debugger send: 'quit' andWait: false.
+
+    "Created: / 22-06-2018 / 11:52:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 test_features
 
     debugger := GDBDebugger new.