--- a/tests/GDBDebuggeesResource.st	Sun Mar 08 08:44:29 2015 +0000
+++ b/tests/GDBDebuggeesResource.st	Sun Mar 08 12:40:03 2015 +0000
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'jv:libgdbs/tests' }"
 
 "{ NameSpace: Smalltalk }"
@@ -39,5 +41,16 @@
     ^ binary pathName
 
     "Created: / 28-02-2015 / 00:47:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+binaryPressAnyKey 
+    | binary |
+
+    binary := (Smalltalk getPackageDirectoryForPackage: self class package) / 'c' / 'press_any_key'.
+    self assert: binary exists.
+    self assert: binary isExecutable.
+    ^ binary pathName
+
+    "Created: / 08-03-2015 / 07:24:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !