--- a/GDBThread.st	Tue Oct 03 21:15:12 2017 +0100
+++ b/GDBThread.st	Fri Nov 17 20:36:08 2017 -0300
@@ -55,9 +55,9 @@
     stack isNil ifTrue:[
         stack := GDBTransientDataHolder debugger: debugger factory:[ 
             | result depth frames |
-            result := debugger send: (GDBMI_stack_info_depth new arguments: { '--thread' . id . 100 }).
+            result := debugger send: (GDBMI_stack_info_depth new arguments: (Array with: '--thread' with: id with: 100)).
             depth := result propertyAt: #depth.
-            result := debugger send: (GDBMI_stack_list_frames new arguments: { '--thread' . id . 0 . depth - 1 }).
+            result := debugger send: (GDBMI_stack_list_frames new arguments: (Array with:  '--thread' with: id with: 0 with: depth - 1 )).
             frames := result propertyAt: #stack.
             frames do:[:each | 
                 each debugger: debugger.
@@ -69,7 +69,7 @@
     ^ stack value
 
     "Created: / 09-09-2014 / 00:02:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 27-02-2015 / 15:10:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 17-11-2017 / 20:21:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 status
@@ -94,7 +94,7 @@
         info := GDBTransientDataHolder debugger: debugger factory:[ 
             | result infos |
 
-            result := debugger send: (GDBMI_thread_info new arguments: { id }).
+            result := debugger send: (GDBMI_thread_info new arguments: (Array with: id)).
             infos := result propertyAt: #threads.
             self assert: (infos isEmptyOrNil or:[ infos size == 1 and:[ infos first id = id ] ]).
             infos isEmptyOrNil 
@@ -105,7 +105,7 @@
     ^ info value
 
     "Created: / 08-03-2015 / 09:07:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 18-03-2015 / 13:58:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 17-11-2017 / 20:21:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !GDBThread methodsFor:'displaying'!