--- a/AbstractOperatingSystem.st	Thu Mar 26 12:16:56 2015 +0100
+++ b/AbstractOperatingSystem.st	Thu Mar 26 12:24:48 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
@@ -2769,6 +2771,22 @@
     "Created: / 19.5.1999 / 12:24:59 / cg"
 !
 
+getObjectFileInfoFor: aStringOrFilename
+    "Return and info object for given executable or shared object
+     or throw an error if given file is not a valid an executable now
+     shared object.
+
+     The info object returned is OS-specific, however it responds to at
+     least
+        #isFor32BitArchitecture
+        #isFor64BitArchitecture ... returns true, if the given object is for
+                                     32bit, 64bit architecture respectively
+    "
+    ^ self subclassResponsibility
+
+    "Modified: / 26-03-2015 / 11:28:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 getTrashDirectory
     "get the name of a trash folder (if the OS supports it),
      or nil, if not.
@@ -7702,11 +7720,11 @@
 !AbstractOperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.294 2015-03-23 15:52:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.295 2015-03-26 11:24:48 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.294 2015-03-23 15:52:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.295 2015-03-26 11:24:48 vrany Exp $'
 ! !